Metrics for Toniolo and Linder, Equation (3a)

start0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze156.0ms (1.1%)

Memory

-21.7MiB live, 223.2MiB allocated

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
50%	49.9%	49.9%	0.2%	0%	0%	0%	3
50%	49.9%	49.9%	0.2%	0%	0%	0%	4
50%	49.9%	49.9%	0.2%	0%	0%	0%	5
50%	49.9%	49.9%	0.2%	0%	0%	0%	6
75%	74.9%	25%	0.2%	0%	0%	0%	7
75%	74.9%	25%	0.2%	0%	0%	0%	8
75%	74.9%	25%	0.2%	0%	0%	0%	9
75%	74.9%	25%	0.2%	0%	0%	0%	10
87.5%	87.3%	12.5%	0.2%	0%	0%	0%	11
87.5%	87.3%	12.5%	0.2%	0%	0%	0%	12

Compiler

Compiled 31 to 24 computations (22.6% saved)

sample2.5s (17%)

Memory

-81.3MiB live, 2 962.8MiB allocated

Samples

1.6s

8 256×

valid

Precisions

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

ival-sin: 409.0ms (30.6% of total)

ival-pow2: 303.0ms (22.7% of total)

ival-mult: 184.0ms (13.8% of total)

ival-div: 172.0ms (12.9% of total)

ival-add: 138.0ms (10.3% of total)

ival-sqrt: 112.0ms (8.4% of total)

exact: 8.0ms (0.6% of total)

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

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

Bogosity

explain369.0ms (2.5%)

Memory

42.1MiB live, 707.5MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
45	-	0	-	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
8	-	1	(9.236914192278398e-237 1.575961471495436e-267 -7.304526708748606e-239 -5.242408510368491e-156)	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
5	-	0	-	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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	-	`Om`
0	-	0	-	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
0	-	0	-	`#s(literal 1 binary64)`
0	-	0	-	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
0	-	0	-	`(*.f64 #s(literal 2 binary64) l)`
0	-	0	-	`(sin.f64 ky)`
0	-	0	-	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
0	-	0	-	`kx`
0	-	0	-	`ky`
0	-	0	-	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
0	-	0	-	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
0	-	0	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	-	0	-	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
0	-	0	-	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
0	-	0	-	`(sin.f64 kx)`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
0	-	0	-	`l`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`	oflow-rescue	45	0
↳	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`	overflow	30
↳	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`	overflow	34
↳	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`	overflow	75
↳	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`	overflow	75
↳	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`	overflow	79
`*.f64`	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`	*no**	3	0

Confusion

	Predicted +	Predicted -
+	0	1
-	48	207

Precision

0.0

Recall

0.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	0	0	1
-	48	0	207

Precision?

0.0

Recall?

0.0

Freqs

test

number	freq
0	208
1	48

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

105.0ms

512×

valid

Compiler

Compiled 445 to 70 computations (84.3% saved)

Precisions

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

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

ival-pow2: 16.0ms (21.1% of total)

ival-div: 11.0ms (14.5% of total)

ival-mult: 9.0ms (11.9% of total)

ival-add: 8.0ms (10.5% of total)

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

ival-true: 1.0ms (1.3% of total)

exact: 1.0ms (1.3% of total)

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

preprocess277.0ms (1.9%)

Memory

-24.2MiB live, 217.4MiB allocated

Algorithm

1×	egg-herbie

Rules

5 280×	`lower-*.f32`
5 274×	`lower-*.f64`
3 044×	`lower-/.f32`
3 040×	`lower-/.f64`
2 794×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	127	391
1	330	354
2	871	354
3	3861	354
4	7924	354
0	22	27
0	39	27
1	64	25
2	124	25
3	440	25
4	1734	25
5	3039	25
6	3563	25
7	3800	25
8	4308	25
9	5672	25
10	6664	25
0	10090	24

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l (/.f64 l (*.f64 Om Om)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))))))

Symmetry

(abs ky)

(abs kx)

(abs Om)

(abs l)

(sort kx ky)

Compiler

Compiled 33 to 22 computations (33.3% saved)

eval0.0ms (0%)

Memory: 0.5MiB live, 0.5MiB allocated
Compiler: Compiled 4 to 4 computations (0% saved)

prune1.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.6%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))

Status

Accuracy

Program

▶

99.6%

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

Compiler

Compiled 33 to 22 computations (33.3% saved)

simplify156.0ms (1.1%)

Memory

1.9MiB live, 160.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	128	(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
cost-diff	320	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))

Rules

5 280×	`lower-*.f32`
5 274×	`lower-*.f64`
3 044×	`lower-/.f32`
3 040×	`lower-/.f64`
2 794×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	198
0	39	198
1	64	194
2	124	194
3	440	194
4	1734	194
5	3039	194
6	3563	194
7	3800	194
8	4308	194
9	5672	194
10	6664	194
0	10090	188

Stop Event

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

Calls

Call 1

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

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

localize82.0ms (0.6%)

Memory

-1.5MiB live, 75.4MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.36328125	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy	0.6197985286663436	(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
accuracy	1.7989446082529983	(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
accuracy	10.473051147342145	(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))

Samples

47.0ms

256×

valid

Compiler

Compiled 206 to 24 computations (88.3% saved)

Precisions

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

ival-sin: 11.0ms (32.3% of total)

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

ival-div: 5.0ms (14.7% of total)

ival-mult: 4.0ms (11.7% of total)

ival-add: 3.0ms (8.8% of total)

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

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

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

exact: 0.0ms (0% of total)

series72.0ms (0.5%)

Memory

28.7MiB live, 106.8MiB allocated

Counts

8 → 276

Calls

Call 1

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

Outputs
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.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) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (taylor 0 kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf kx) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor 0 ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (taylor -inf ky) (#s(alt (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (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

69 calls:

Time	Variable		Point	Expression
6.0ms	ky	@	inf	(* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
5.0ms	kx	@	-inf	(* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
5.0ms	kx	@	0	(* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
3.0ms	kx	@	inf	(* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
3.0ms	ky	@	0	(* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))

simplify346.0ms (2.4%)

Memory

16.3MiB live, 402.5MiB allocated

Algorithm

1×	egg-herbie

Rules

11 696×	`lower-fma.f64`
11 696×	`lower-fma.f32`
8 910×	`lower-*.f64`
8 910×	`lower-*.f32`
3 486×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	582	10419
1	1932	10186
2	7931	10184
0	8041	9659

Stop Event

1×	iter limit
1×	node limit

Counts

276 → 276

Calls

Call 1

Inputs
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) Om)
(/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 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
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 3 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (neg.f64 (.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal -12 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 3 binary64)))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.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 (/.f64 Om l) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(fma.f64 Om (.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l))) #s(literal -1/32 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) #s(literal -3/256 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (.f64 Om (pow.f64 l #s(literal 5 binary64))))) (fma.f64 Om (.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (*.f64 l l))) #s(literal -1/32 binary64)) #s(literal 1/2 binary64))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.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 (/.f64 Om l) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 Om (.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))))) #s(literal 1/4 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/32 binary64)))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 Om (.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))))) #s(literal 1/4 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/32 binary64)) (.f64 (/.f64 (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) #s(literal -3/256 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.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 (/.f64 Om l) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (.f64 (/.f64 #s(literal -1/32 binary64) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) #s(literal 3/512 binary64)) (.f64 (/.f64 #s(literal -1/32 binary64) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 64 binary64)) (.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64)))) (.f64 (.f64 l l) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 64 binary64)) (.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64)))) (.f64 (.f64 l l) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 l (.f64 l (.f64 kx kx))) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 kx (.f64 kx (fma.f64 (.f64 l l) (.f64 (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 (.f64 ky ky) #s(literal -1/4 binary64)) (.f64 (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (.f64 l l) (.f64 (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 8/45 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (.f64 l (.f64 kx kx))) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4/3 binary64) (.f64 kx kx)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (/.f64 (.f64 #s(literal 8/45 binary64) (.f64 l l)) (.f64 Om Om)) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))))) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4/3 binary64) (.f64 ky ky)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 8/45 binary64) (.f64 ky ky)) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))))) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (*.f64 l l)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (.f64 l l) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(.f64 l (fma.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 (/.f64 Om (.f64 l l)) #s(literal 1/4 binary64)) (.f64 (/.f64 #s(literal 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(.f64 l (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64))) #s(literal -1/64 binary64)) (fma.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 (/.f64 Om (.f64 l l)) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(.f64 l (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64))) #s(literal -1/64 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) #s(literal 1/512 binary64)) (fma.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 (/.f64 Om (.f64 l l)) #s(literal 1/4 binary64)) (.f64 (/.f64 #s(literal 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
(* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (.f64 (/.f64 l Om) #s(literal -2 binary64)))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(.f64 (fma.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 (/.f64 Om (.f64 l l)) #s(literal 1/4 binary64)) (.f64 (/.f64 #s(literal 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64))) #s(literal -1/64 binary64)) (fma.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 (/.f64 Om (.f64 l l)) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(neg.f64 (.f64 l (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64))) #s(literal -1/64 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) #s(literal 1/512 binary64)) (fma.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 (/.f64 Om (.f64 l l)) #s(literal 1/4 binary64)) (.f64 (/.f64 #s(literal 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) Om)
(/.f64 (fma.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 (/.f64 (.f64 Om Om) l) #s(literal 1/4 binary64)) (.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (.f64 l #s(literal 2 binary64)))) Om)
(/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) Om)
(/.f64 (fma.f64 l (.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (.f64 (/.f64 #s(literal -1/64 binary64) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) #s(literal 1/512 binary64)) (.f64 (/.f64 #s(literal -1/64 binary64) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (.f64 l #s(literal 2 binary64)))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (fma.f64 (.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (.f64 (.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (fma.f64 (.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 Om Om)) (.f64 (.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (fma.f64 #s(literal 4 binary64) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 l (.f64 l (.f64 kx kx))) (.f64 Om Om)) #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 Om Om)))) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 (.f64 kx kx) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 Om Om)))) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 (.f64 ky ky) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 8/45 binary64) (.f64 l l)) (.f64 Om Om)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) (/.f64 (.f64 l (.f64 l (.f64 kx kx))) (*.f64 Om Om))))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4/3 binary64) (.f64 kx kx)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)))))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (/.f64 (.f64 #s(literal 8/45 binary64) (.f64 l l)) (.f64 Om Om)) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))))) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (*.f64 Om Om)))))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4/3 binary64) (.f64 ky ky)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 8/45 binary64) (.f64 ky ky)) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))))) (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 6 binary64)) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal -12 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) #s(literal -1/2 binary64)) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 6 binary64))) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64))) #s(literal 1 binary64))
(* 1/2 (* (/ Om l) (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 (/.f64 Om l) #s(literal 1/2 binary64)))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/16 binary64)) (.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 Om #s(literal 1/2 binary64)))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)
(/.f64 (-.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/16 binary64)) (.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 Om #s(literal 1/2 binary64)))) (/.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal -3/256 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (pow.f64 l #s(literal 4 binary64))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)
(/.f64 (fma.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) #s(literal -3/256 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 Om (pow.f64 l #s(literal 4 binary64))))) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 Om Om)) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 4 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/16 binary64)) (.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 Om #s(literal 1/2 binary64))))) l)
(* -1/2 (* (/ Om l) (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 (/.f64 Om l) #s(literal -1/2 binary64)))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/16 binary64)) (.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 Om #s(literal 1/2 binary64)))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))
(/.f64 (-.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/16 binary64)) (.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 Om #s(literal 1/2 binary64)))) (/.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal -3/256 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (pow.f64 l #s(literal 4 binary64))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l))
(/.f64 (fma.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (-.f64 (neg.f64 (/.f64 (/.f64 (.f64 (pow.f64 Om #s(literal 6 binary64)) #s(literal -3/256 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 Om (pow.f64 l #s(literal 4 binary64))))) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (.f64 Om Om)) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 4 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l)) #s(literal -1/16 binary64)) (.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 Om #s(literal 1/2 binary64))))) (neg.f64 l))
(* 1/2 (* (/ Om l) (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 (/.f64 Om l) #s(literal 1/2 binary64)))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.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))))) l) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 Om Om) (.f64 l (.f64 l l))) #s(literal -1/16 binary64)))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) #s(literal 3/256 binary64)) (.f64 (/.f64 #s(literal -1/16 binary64) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 1/2 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 7 binary64)))) (.f64 (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) #s(literal -5/2048 binary64)) (.f64 (/.f64 #s(literal 3/256 binary64) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))))) (.f64 (/.f64 #s(literal -1/16 binary64) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 1/2 binary64) l) (sqrt.f64 (/.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 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 64 binary64)) (.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64)))) (.f64 (.f64 l l) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 64 binary64)) (.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal -12 binary64)))) (.f64 (.f64 l l) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (fma.f64 (.f64 l l) (.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64)) #s(literal 1 binary64)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 l (.f64 l (.f64 kx kx))) (.f64 Om Om)) #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -2 binary64)) (.f64 (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -2 binary64)) (.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 kx (.f64 kx (fma.f64 (.f64 l l) (.f64 (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (.f64 l l) (.f64 (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 8/45 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 Om Om)) #s(literal 1 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 ky (.f64 ky (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))

rewrite388.0ms (2.7%)

Memory

10.7MiB live, 589.6MiB allocated

Rules

9 134×	`lower-fma.f64`
9 134×	`lower-fma.f32`
6 008×	`lower-*.f32`
6 002×	`lower-*.f64`
2 908×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	21	116
0	37	116
1	129	113
2	924	113
0	8513	109

Stop Event

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

Counts

8 → 639

Calls

Call 1

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

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

eval154.0ms (1.1%)

Memory: 7.2MiB live, 352.3MiB allocated
Compiler: Compiled 46 391 to 5 335 computations (88.5% saved)

prune146.0ms (1%)

Memory

-42.4MiB live, 342.8MiB allocated

Pruning

8 alts after pruning (8 fresh and 0 done)

	Pruned	Kept	Total
New	907	8	915
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	908	8	916

Accuracy

100.0%

Counts

916 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	79.1%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
▶	92.8%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))))
	73.1%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))))))))
▶	38.1%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64))))))
	85.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
▶	66.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
	58.0%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))
▶	59.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))

Compiler

Compiled 518 to 318 computations (38.6% saved)

simplify493.0ms (3.4%)

Memory

29.0MiB live, 357.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

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

Rules

9 644×	`lower-*.f32`
9 622×	`lower-*.f64`
8 640×	`lower-fma.f32`
8 632×	`lower-fma.f64`
1 706×	`distribute-rgt-neg-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	1385
0	131	1389
1	241	1257
2	749	1189
3	5407	1189
0	8836	1139

Stop Event

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

Calls

Call 1

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

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

localize525.0ms (3.6%)

Memory

11.9MiB live, 600.2MiB allocated

Localize:

Found 18 expressions of interest:

New	Metric	Score
accuracy	1.4575006834810944	(.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 ky ky))))) (.f64 #s(literal 4 binary64) (*.f64 l l)))
accuracy	5.481708033083829	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy	8.196846469091598	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
accuracy	9.325338364687871	(/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om))
accuracy	0.2421902510508252	(fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64))
accuracy	5.481708033083829	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy	8.196846469091598	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
accuracy	9.401558364400902	(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
accuracy	0.05859375	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy	0.29513187282038517	#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
accuracy	3.3906635147115534	(fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
accuracy	4.904401573769782	(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
accuracy	0.00390625	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
accuracy	24.98437264773807	#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))
accuracy	0.04201127930532605	(*.f64 (/.f64 l Om) #s(literal 4 binary64))
accuracy	0.7018109532559829	(.f64 (/.f64 l Om) (+.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))))))
accuracy	5.481708033083829	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy	8.196846469091598	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))

Samples

94.0ms	47×	2	valid
93.0ms	116×	0	invalid
65.0ms	44×	1	valid
28.0ms	17×	1	invalid
21.0ms	32×	0	valid

Compiler

Compiled 1 375 to 75 computations (94.5% saved)

Precisions

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

ival-mult: 43.0ms (19.7% of total)

ival-cos: 33.0ms (15.1% of total)

ival-sqrt: 25.0ms (11.4% of total)

ival-add: 25.0ms (11.4% of total)

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

adjust: 20.0ms (9.1% of total)

ival-pow: 18.0ms (8.2% of total)

ival-pow2: 13.0ms (5.9% of total)

ival-sin: 13.0ms (5.9% of total)

ival-sub: 4.0ms (1.8% of total)

exact: 1.0ms (0.5% of total)

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

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

series363.0ms (2.5%)

Memory

-18.4MiB live, 238.0MiB allocated

Counts

23 → 804

Calls

Call 1

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

Outputs
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2))) (taylor 0 kx) (#s(alt (+.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))))) (patch (+.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))))) #<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 (+.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))))) (patch (+.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))))) #<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 (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2))) (taylor 0 ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))) (taylor 0 ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))) (taylor 0 ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3)))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3)))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))) (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (/ Om (* l (sin kx))))) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx)))))) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx)))) l))) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx))))) l))) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/4 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/4 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (/ Om (* l (sin kx))))) (taylor 0 Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ 1 (* l (sin kx))))))) (taylor 0 Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/4 (/ 1 (* l (sin kx))))))) (taylor 0 Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))))) (taylor inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ Om (* l (sin kx)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin kx) (+ (* 1/256 (/ (pow Om 8) (pow (sin kx) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (pow (sin kx) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ Om (* l (sin kx)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin kx) (+ (* 1/256 (/ (pow Om 8) (pow (sin kx) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (pow (sin kx) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/2 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ Om (* l (sin kx)))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/2 (/ 1 (* l (sin kx)))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* (pow Om 2) (- (* 3/256 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/2 (/ 1 (* l (sin kx)))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* (pow Om 2) (- (* (pow Om 2) (+ (* -5/2048 (/ (pow Om 2) (* (pow l 7) (pow (sin kx) 7)))) (* 3/256 (/ 1 (* (pow l 5) (pow (sin kx) 5)))))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/2 (/ 1 (* l (sin kx)))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<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 1 (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* 1/2 (* (* (pow kx 2) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* 1/2 (* (* (pow kx 2) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (- (* -8/45 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- (* 4/45 (+ 1/2 (* -1/2 (cos (* 2 ky))))) 2/3))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/2 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (* (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* 1/2 (* (* (pow ky 2) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* 1/2 (* (* (pow ky 2) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (- (* -8/45 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- (* 4/45 (+ 1/2 (* -1/2 (cos (* 2 kx))))) 2/3))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/2 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (* (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 2 (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 2 (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 2 (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) (patch (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.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)))))) (patch (.f64 (/.f64 l Om) (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ l Om)) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(literal 4 binary64)) (patch (.f64 (/.f64 l Om) #s(literal 4 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow Om 2)) (taylor 0 kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2)))) (taylor 0 kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* (pow kx 2) (- (* 2/45 (/ (pow kx 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2)))) (taylor 0 kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/315 (/ (pow kx 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2)))) (taylor 0 kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin kx) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (+.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))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (taylor 0 kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor 0 ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) (patch (/.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow kx 2) (pow l 2))) (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -4/3 (* (pow kx 2) (pow l 2))) (* 4 (pow l 2))))) (taylor 0 kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* 4 (pow l 2)) (* (pow kx 2) (+ (* -4/3 (pow l 2)) (* 8/45 (* (pow kx 2) (pow l 2)))))))) (taylor 0 kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf kx) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow ky 2) (pow l 2))) (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (taylor 0 ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -4/3 (* (pow ky 2) (pow l 2))) (* 4 (pow l 2))))) (taylor 0 ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* 4 (pow l 2)) (* (pow ky 2) (+ (* -4/3 (pow l 2)) (* 8/45 (* (pow ky 2) (pow l 2)))))))) (taylor 0 ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor 0 l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor 0 l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor 0 l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor 0 l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (taylor -inf l) (#s(alt (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) (patch (.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 ky ky))))) (.f64 #s(literal 4 binary64) (.f64 l l))) #<representation binary64>) () ())) ())

Calls

201 calls:

Time	Variable		Point	Expression
40.0ms	l	@	0	(+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1)
30.0ms	kx	@	inf	(+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2)
26.0ms	Om	@	-inf	(sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2))
13.0ms	kx	@	-inf	(* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1)))))
9.0ms	kx	@	inf	(+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1)

simplify661.0ms (4.5%)

Memory

22.1MiB live, 680.1MiB allocated

Algorithm

1×	egg-herbie

Rules

7 970×	`lower-*.f64`
7 970×	`lower-*.f32`
6 834×	`lower-fma.f64`
6 834×	`lower-fma.f32`
4 522×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1650	38730
1	5596	37731
0	8605	35649

Stop Event

1×	iter limit
1×	node limit

Counts

804 → 804

Calls

Call 1

Inputs
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))
(+ 1/2 (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx)))))))
1/2
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx)))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx))))) l)))
1
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/4 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/4 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
1/2
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ 1 (* l (sin kx)))))))
(+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/4 (/ 1 (* l (sin kx)))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))))
(* 1/2 (/ Om (* l (sin kx))))
(/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))) l)
(/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx))))) l)
(/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin kx) (+ (* 1/256 (/ (pow Om 8) (pow (sin kx) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (pow (sin kx) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))))) l)
(* -1/2 (/ Om (* l (sin kx))))
(* -1 (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))) l))
(* -1 (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx))))) l))
(* -1 (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin kx) (+ (* 1/256 (/ (pow Om 8) (pow (sin kx) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (pow (sin kx) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))))) l))
1
(+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/2 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(* 1/2 (/ Om (* l (sin kx))))
(* Om (+ (* -1/16 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/2 (/ 1 (* l (sin kx))))))
(* Om (+ (* (pow Om 2) (- (* 3/256 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/2 (/ 1 (* l (sin kx))))))
(* Om (+ (* (pow Om 2) (- (* (pow Om 2) (+ (* -5/2048 (/ (pow Om 2) (* (pow l 7) (pow (sin kx) 7)))) (* 3/256 (/ 1 (* (pow l 5) (pow (sin kx) 5)))))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/2 (/ 1 (* l (sin kx))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(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))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (neg (* -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)))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* 1/2 (* (* (pow kx 2) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* 1/2 (* (* (pow kx 2) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (- (* -8/45 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- (* 4/45 (+ 1/2 (* -1/2 (cos (* 2 ky))))) 2/3))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/2 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (* (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* 1/2 (* (* (pow ky 2) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* 1/2 (* (* (pow ky 2) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (- (* -8/45 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- (* 4/45 (+ 1/2 (* -1/2 (cos (* 2 kx))))) 2/3))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/2 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (* (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1
(+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(* 4 (/ l Om))
(/ (pow kx 2) (pow Om 2))
(* (pow kx 2) (+ (* -1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2))))
(* (pow kx 2) (+ (* (pow kx 2) (- (* 2/45 (/ (pow kx 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(* (pow kx 2) (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/315 (/ (pow kx 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
(/ (pow (sin kx) 2) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
1
(+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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)
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* 4 (* (pow kx 2) (pow l 2))) (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -4/3 (* (pow kx 2) (pow l 2))) (* 4 (pow l 2)))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* 4 (pow l 2)) (* (pow kx 2) (+ (* -4/3 (pow l 2)) (* 8/45 (* (pow kx 2) (pow l 2))))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(+ (* 4 (* (pow ky 2) (pow l 2))) (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -4/3 (* (pow ky 2) (pow l 2))) (* 4 (pow l 2)))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* 4 (pow l 2)) (* (pow ky 2) (+ (* -4/3 (pow l 2)) (* 8/45 (* (pow ky 2) (pow l 2))))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))

Outputs
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 #s(literal -4/3 binary64) (.f64 ky ky)) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 #s(literal 8/45 binary64) (.f64 ky ky)) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #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))) (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 (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) (fma.f64 (*.f64 kx kx) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) (.f64 ky ky)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (/.f64 (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)) (neg.f64 (.f64 Om Om)))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.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 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (*.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 l (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64))) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.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 #s(literal -1/32 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (*.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 kx kx) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 (.f64 l l) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 ky ky) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.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))))) l))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.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))))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+.f64 (fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+.f64 (fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.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 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (*.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 l (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64))) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.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 #s(literal -1/32 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (*.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 kx kx) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 (.f64 l l) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 ky ky) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.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))))) l))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.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))))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+.f64 (fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+.f64 (fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))
(+.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l (*.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(+ 1/2 (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx)))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 kx) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx)))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 kx) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) l))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (.f64 kx kx) (/.f64 (neg.f64 (.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 kx kx)) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om)))) (/.f64 (neg.f64 (.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/4 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/4 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 Om Om)) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))))))) (/.f64 (.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ 1 (* l (sin kx)))))))
(fma.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/4 (/ 1 (* l (sin kx)))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sin.f64 kx) #s(literal 5 binary64)))) (/.f64 #s(literal -1/32 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om))) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om))) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))) #s(literal 1 binary64))
(* 1/2 (/ Om (* l (sin kx))))
(/.f64 (.f64 #s(literal 1/2 binary64) Om) (.f64 l (sin.f64 kx)))
(/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))) l)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Om (.f64 Om Om))) (.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) l)
(/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx))))) l)
(/.f64 (fma.f64 (neg.f64 (sin.f64 kx)) (/.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Om (.f64 Om Om))) (.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) l)
(/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin kx) (+ (* 1/256 (/ (pow Om 8) (pow (sin kx) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (pow (sin kx) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))))) l)
(/.f64 (-.f64 (fma.f64 (sin.f64 kx) (neg.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 kx) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64))) (*.f64 Om (pow.f64 l #s(literal 4 binary64))))) l)
(* -1/2 (/ Om (* l (sin kx))))
(/.f64 (.f64 #s(literal -1/2 binary64) Om) (.f64 l (sin.f64 kx)))
(* -1 (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))) l))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Om (.f64 Om Om))) (.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx))))) l))
(/.f64 (fma.f64 (neg.f64 (sin.f64 kx)) (/.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Om (.f64 Om Om))) (.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin kx) (+ (* 1/256 (/ (pow Om 8) (pow (sin kx) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (pow (sin kx) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/2 (/ Om (sin kx)))))) l))
(/.f64 (-.f64 (fma.f64 (sin.f64 kx) (neg.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 kx) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64))) (*.f64 Om (pow.f64 l #s(literal 4 binary64))))) (neg.f64 l))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/2 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 Om Om)) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om)))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(* 1/2 (/ Om (* l (sin kx))))
(/.f64 (.f64 #s(literal 1/2 binary64) Om) (.f64 l (sin.f64 kx)))
(* Om (+ (* -1/16 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/2 (/ 1 (* l (sin kx))))))
(.f64 Om (fma.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 l (sin.f64 kx)))))
(* Om (+ (* (pow Om 2) (- (* 3/256 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/2 (/ 1 (* l (sin kx))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (.f64 Om Om) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sin.f64 kx) #s(literal 5 binary64)))) #s(literal 3/256 binary64) (/.f64 #s(literal -1/16 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 l (sin.f64 kx)))))
(* Om (+ (* (pow Om 2) (- (* (pow Om 2) (+ (* -5/2048 (/ (pow Om 2) (* (pow l 7) (pow (sin kx) 7)))) (* 3/256 (/ 1 (* (pow l 5) (pow (sin kx) 5)))))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/2 (/ 1 (* l (sin kx))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 l #s(literal 7 binary64)) (pow.f64 (sin.f64 kx) #s(literal 7 binary64)))) (/.f64 #s(literal 3/256 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sin.f64 kx) #s(literal 5 binary64))))) (/.f64 #s(literal -1/16 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 l (sin.f64 kx)))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 Om #s(literal 6 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 (.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)))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (/.f64 (.f64 #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))) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 Om Om)))) (.f64 #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (.f64 #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))) (*.f64 Om Om))) #s(literal 1 binary64))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (.f64 (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 Om (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (.f64 (.f64 l (.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (.f64 #s(literal 1/128 binary64) (.f64 Om Om)) (.f64 (.f64 l (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (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/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l l)))) (.f64 #s(literal -1/512 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal -1/128 binary64) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* 1/2 (* (* (pow kx 2) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* 1/2 (* (* (pow kx 2) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))) (+.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (-.f64 (/.f64 (.f64 #s(literal 4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (- (* -8/45 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (- (* 4/45 (+ 1/2 (* -1/2 (cos (* 2 ky))))) 2/3))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/2 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (* (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 ky)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))) (+.f64 (-.f64 (/.f64 (.f64 #s(literal 4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))) (.f64 (.f64 kx kx) (-.f64 (/.f64 (.f64 #s(literal -8/45 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) #s(literal 4/3 binary64) (.f64 #s(literal 16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4/45 binary64) #s(literal -2/3 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (.f64 #s(literal 4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))))))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* 1/2 (* (* (pow ky 2) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* 1/2 (* (* (pow ky 2) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))) (+.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (-.f64 (/.f64 (.f64 #s(literal 4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))))))
(+ 1 (+ (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (- (* -8/45 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (- (* 4/45 (+ 1/2 (* -1/2 (cos (* 2 kx))))) 2/3))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/2 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (* (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) (- (* 4/3 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))))) (* (pow Om 4) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (+ (* -16 (/ (* (pow l 4) (* (+ 1 (* -2/3 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2)))) (* 1/4 (/ (* (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (pow (- (* -4 (/ (pow l 2) (* (pow Om 2) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4))))))) (* -16 (/ (* (pow l 4) (* (+ 1 (* -1 (cos (* 2 kx)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow Om 4) (pow (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) 2))))) 2)) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (sqrt (/ (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)) (pow Om 4)))) (- 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))) (+.f64 (-.f64 (/.f64 (.f64 #s(literal 4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))))) (.f64 (.f64 ky ky) (-.f64 (/.f64 (.f64 #s(literal -8/45 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal 4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4/45 binary64) #s(literal -2/3 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (.f64 #s(literal 4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (fma.f64 #s(literal -16 binary64) (.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -2/3 binary64) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (pow.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))))))))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
(+ 1 (sqrt (/ (- 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (- 1 (* 16 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) 2)) (pow Om 4)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -16 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))))))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 #s(literal -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))) (.f64 Om Om))) #s(literal 2 binary64))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (/.f64 (.f64 #s(literal -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))) (*.f64 Om Om))) #s(literal 2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64)) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))
(+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (.f64 (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -1/16 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) #s(literal -1/16 binary64) (.f64 (.f64 #s(literal 1/2 binary64) Om) (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)))))) l))
(+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) #s(literal -1/16 binary64) (.f64 (.f64 #s(literal 1/2 binary64) Om) (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 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64))))) l))
1
#s(literal 1 binary64)
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1 binary64))
(+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/16 binary64) (.f64 (.f64 #s(literal 3/256 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l))) #s(literal 1 binary64))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (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 Om Om))))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 kx kx)) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 kx kx)) Om) (/.f64 l Om))))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (/.f64 (.f64 l (.f64 kx kx)) Om) (/.f64 (*.f64 #s(literal -1/3 binary64) l) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 ky ky)) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 ky ky)) Om) (/.f64 l Om))))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (/.f64 (.f64 l (.f64 ky ky)) Om) (/.f64 (*.f64 #s(literal -1/3 binary64) l) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(* 4 (/ l Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(/ (pow kx 2) (pow Om 2))
(/.f64 (.f64 kx kx) (.f64 Om Om))
(* (pow kx 2) (+ (* -1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2))))
(.f64 (.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 kx kx) (.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(* (pow kx 2) (+ (* (pow kx 2) (- (* 2/45 (/ (pow kx 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (/.f64 (.f64 kx kx) (.f64 Om Om)) (/.f64 #s(literal -1/3 binary64) (.f64 Om Om))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(* (pow kx 2) (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/315 (/ (pow kx 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/315 binary64) (/.f64 (.f64 kx kx) (.f64 Om Om)) (/.f64 #s(literal 2/45 binary64) (.f64 Om Om))) (/.f64 #s(literal -1/3 binary64) (.f64 Om Om))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin kx) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 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 (.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))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 #s(literal -4/3 binary64) (.f64 ky ky)) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 #s(literal 8/45 binary64) (.f64 ky ky)) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 (.f64 l l) #s(literal -4/3 binary64)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 #s(literal -4/3 binary64) (.f64 ky ky)) (.f64 l l)) (*.f64 Om Om)))))
(+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 #s(literal 8/45 binary64) (.f64 ky ky)) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* 4 (* (pow kx 2) (pow l 2))) (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (fma.f64 kx kx (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -4/3 (* (pow kx 2) (pow l 2))) (* 4 (pow l 2)))))
(fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (.f64 kx kx) #s(literal 4 binary64)))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* 4 (pow l 2)) (* (pow kx 2) (+ (* -4/3 (pow l 2)) (* 8/45 (* (pow kx 2) (pow l 2))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (.f64 kx kx) (.f64 (.f64 l l) (fma.f64 #s(literal 8/45 binary64) (.f64 kx kx) #s(literal -4/3 binary64))))) (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* 4 (* (pow ky 2) (pow l 2))) (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))))
(.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -4/3 (* (pow ky 2) (pow l 2))) (* 4 (pow l 2)))))
(fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 ky ky) (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (.f64 ky ky) #s(literal 4 binary64)))))
(+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* 4 (pow l 2)) (* (pow ky 2) (+ (* -4/3 (pow l 2)) (* 8/45 (* (pow ky 2) (pow l 2))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 l l) (fma.f64 #s(literal 8/45 binary64) (.f64 ky ky) #s(literal -4/3 binary64))) (.f64 #s(literal 4 binary64) (.f64 l l))) (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))
(* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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)))

rewrite300.0ms (2.1%)

Memory

-6.8MiB live, 343.4MiB allocated

Rules

3 150×	`lower-*.f32`
3 132×	`lower-*.f64`
2 342×	`lower-fma.f32`
2 334×	`lower-fma.f64`
1 662×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	72	533
0	123	531
1	525	435
2	5036	433
0	8064	409

Stop Event

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

Counts

23 → 679

Calls

Call 1

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

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

eval381.0ms (2.6%)

Memory: 31.0MiB live, 577.8MiB allocated
Compiler: Compiled 124 368 to 9 208 computations (92.6% saved)

prune311.0ms (2.1%)

Memory

-32.1MiB live, 497.5MiB allocated

Pruning

8 alts after pruning (7 fresh and 1 done)

	Pruned	Kept	Total
New	2 046	7	2 053
Fresh	3	0	3
Picked	4	1	5
Done	0	0	0
Total	2 053	8	2 061

Accuracy

100.0%

Counts

2 061 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	79.0%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
▶	75.3%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))))
▶	92.7%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))))
	46.6%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))))
▶	36.1%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))))
✓	59.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
▶	58.0%	#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))
	85.3%	#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))

Compiler

Compiled 365 to 260 computations (28.8% saved)

simplify278.0ms (1.9%)

Memory

11.3MiB live, 421.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

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

Rules

15 580×	`lower-fma.f32`
15 570×	`lower-fma.f64`
6 216×	`lower-*.f32`
6 192×	`lower-*.f64`
4 362×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	97	1122
0	146	1126
1	268	1048
2	735	1012
3	3280	1012
0	8182	964

Stop Event

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

Calls

Call 1

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

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

localize488.0ms (3.3%)

Memory

16.8MiB live, 959.4MiB allocated

Localize:

Found 17 expressions of interest:

New	Metric	Score
accuracy	2.2740628327922403	(.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))
accuracy	10.473051147342145	(sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))
accuracy	19.21187265665849	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
accuracy	48.96824608447398	#s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))
accuracy	10.473051147342145	(sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))
accuracy	10.513163891524382	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	13.39641785001472	#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))
accuracy	14.580222372711651	(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
accuracy	0.046875	(*.f64 l (sin.f64 kx))
accuracy	3.1371258454013757	(/.f64 Om (*.f64 l (sin.f64 kx)))
accuracy	8.698897992370462	#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))
accuracy	40.510030628268154	#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))
accuracy	26.90150076186163	#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))
accuracy	2.2740628327922403	(.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))))
accuracy	10.473051147342145	(sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))
accuracy	10.513163891524382	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	13.39641785001472	#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))

Samples

210.0ms	123×	2	valid
94.0ms	66×	1	valid
43.0ms	67×	0	valid

Compiler

Compiled 932 to 74 computations (92.1% saved)

Precisions

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

ival-cos: 69.0ms (24.8% of total)

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

adjust: 38.0ms (13.6% of total)

ival-add: 37.0ms (13.3% of total)

ival-div: 31.0ms (11.1% of total)

ival-sqrt: 22.0ms (7.9% of total)

ival-sin: 16.0ms (5.7% of total)

ival-pow2: 11.0ms (3.9% of total)

exact: 1.0ms (0.4% of total)

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

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

series168.0ms (1.1%)

Memory

15.2MiB live, 358.9MiB allocated

Counts

26 → 984

Calls

Call 1

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

Outputs
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3)))))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2))))))) (taylor inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))) (taylor 0 Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))) (taylor 0 kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))) (taylor 0 kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (patch #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3)))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))) (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) (patch #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (/ Om (* l (sin kx))))) (taylor inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx)))))) (taylor inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))) (taylor inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx)))) l))) (taylor -inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx))))) l))) (taylor -inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))) (taylor 0 kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/4 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/4 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))) (taylor 0 kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (/ Om (* l (sin kx))))) (taylor 0 Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ 1 (* l (sin kx))))))) (taylor 0 Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/4 (/ 1 (* l (sin kx))))))) (taylor 0 Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) (patch #s(approx (+ ( 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor 0 Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor 0 Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor 0 Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ Om (* l (sin kx)))) (taylor inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx)))))) (taylor inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx)))))) (taylor inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx)))))) (taylor inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ Om (* l (sin kx)))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))) (taylor -inf Om) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ Om (* l (sin kx)))) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ Om (* kx l))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ Om l)) (* 1/2 kx)) kx) (taylor 0 kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ Om l)) (* kx (+ 1/2 (* -1/24 (/ (* Om kx) l))))) kx) (taylor 0 kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ Om l)) (* kx (+ 1/2 (* kx (+ (* -1/24 (/ Om l)) (* 1/4 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))))) kx) (taylor 0 kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2))) (taylor 0 kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (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 (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf Om) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor 0 l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf l) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* kx l)) (taylor 0 kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx) (taylor 0 kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx) (taylor 0 kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx) (taylor 0 kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ Om (* l (sin kx))) (taylor -inf kx) (#s(alt (/.f64 Om (.f64 l (sin.f64 kx))) (patch (/.f64 Om (.f64 l (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor 0 l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor 0 l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor 0 l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor 0 l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf l) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* kx l) (taylor 0 kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* kx (+ l (* -1/6 (* (pow kx 2) l)))) (taylor 0 kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* 1/120 (* (pow kx 2) l)))))) (taylor 0 kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* (pow kx 2) (+ (* -1/5040 (* (pow kx 2) l)) (* 1/120 l))))))) (taylor 0 kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* l (sin kx)) (taylor -inf kx) (#s(alt (.f64 l (sin.f64 kx)) (patch (.f64 l (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (patch (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.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 (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.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 (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<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 ky ky)) (patch #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #<representation binary64>) () ())) ())

Calls

246 calls:

Time	Variable		Point	Expression
4.0ms	l	@	0	(sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))))
3.0ms	kx	@	0	(sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))
3.0ms	ky	@	0	(sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))))
3.0ms	kx	@	0	(sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))))
2.0ms	Om	@	inf	(sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))))

simplify467.0ms (3.2%)

Memory

-18.4MiB live, 974.9MiB allocated

Algorithm

1×	egg-herbie

Rules

8 130×	`lower-*.f64`
8 130×	`lower-*.f32`
6 824×	`lower-fma.f64`
6 824×	`lower-fma.f32`
4 490×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1703	49453
1	5724	48127
0	8705	44780

Stop Event

1×	iter limit
1×	node limit

Counts

984 → 984

Calls

Call 1

Inputs
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))
(+ 1/2 (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx)))))))
1/2
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx)))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx))))) l)))
1
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/4 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/4 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
1/2
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ 1 (* l (sin kx)))))))
(+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/4 (/ 1 (* l (sin kx)))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
1/2
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(* -1/4 (/ Om (* l (sin kx))))
(* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(* -1/4 (/ Om (* l (sin kx))))
(* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om)))))
(* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om)))))
(* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om)))))
(* -1/4 (/ Om (* l (sin kx))))
(/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l)
(/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l)
(/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l)
1/2
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
1/2
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(* -1/4 (/ Om (* kx l)))
(/ (+ (* -1/4 (/ Om l)) (* 1/2 kx)) kx)
(/ (+ (* -1/4 (/ Om l)) (* kx (+ 1/2 (* -1/24 (/ (* Om kx) l))))) kx)
(/ (+ (* -1/4 (/ Om l)) (* kx (+ 1/2 (* kx (+ (* -1/24 (/ Om l)) (* 1/4 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))))) kx)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)
(* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 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))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (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 (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* kx l))
(/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx)
(/ (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)
(/ (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(/ Om (* l (sin kx)))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* kx l)
(* kx (+ l (* -1/6 (* (pow kx 2) l))))
(* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* 1/120 (* (pow kx 2) l))))))
(* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* (pow kx 2) (+ (* -1/5040 (* (pow kx 2) l)) (* 1/120 l)))))))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* l (sin kx))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)

Outputs
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (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)) (sqrt.f64 #s(literal 1/2 binary64))) (neg.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (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)) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (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)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (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)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 l l) (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)))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 l (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))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64))) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #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)))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (.f64 (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 (sqrt.f64 #s(literal 1/2 binary64)) l)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 l l) (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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (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)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 kx kx) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 ky ky) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (/.f64 (.f64 #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))) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 Om Om)))) (.f64 #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (.f64 #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))) (*.f64 Om Om))) #s(literal 1 binary64))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (.f64 (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 Om (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (.f64 (.f64 l (.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (.f64 #s(literal 1/128 binary64) (.f64 Om Om)) (.f64 (.f64 l (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (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/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l l)))) (.f64 #s(literal -1/512 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal -1/128 binary64) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (sqrt.f64 (/.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 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (*.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (pow l 3))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 l (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64))) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.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 #s(literal -1/32 binary64) (.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (*.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 l l) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 kx kx) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 ky ky) (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 Om Om))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))))))))))))) (.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.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))))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.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))))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 l l)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 Om Om))) #s(literal 1 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin kx) 2) (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin kx) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin kx) 4) (pow Om 4))) (* 4 (/ (pow (sin kx) 4) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))
(+.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l (*.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(+ 1/2 (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx)))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 kx) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l (sin.f64 kx))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx)))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin kx) (+ (* -1/64 (/ (pow Om 6) (pow (sin kx) 6))) (* 1/256 (/ (pow Om 6) (pow (sin kx) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin kx) 3)))) (* 1/4 (/ Om (sin kx))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 kx) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -3/256 binary64))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) l))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 kx kx)) (/.f64 (.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 kx kx)) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/4 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/4 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 Om Om)) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64)))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))))))) (/.f64 (.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin kx) 3)))) (* 1/4 (/ 1 (* l (sin kx)))))))
(fma.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin kx) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin kx) 3)))))) (* 1/4 (/ 1 (* l (sin kx)))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sin.f64 kx) #s(literal 5 binary64)))) (/.f64 #s(literal -1/32 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(+.f64 (fma.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin kx) 2) (+ (* -16 (* (pow l 4) (pow (sin kx) 4))) (* 4 (* (pow l 4) (pow (sin kx) 4))))))) (* 64 (* (pow l 6) (pow (sin kx) 6)))) (pow Om 6))))))
(+.f64 (fma.f64 (neg.f64 (.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 Om #s(literal 6 binary64))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(* -1/4 (/ Om (* l (sin kx))))
(/.f64 (.f64 #s(literal -1/4 binary64) Om) (.f64 l (sin.f64 kx)))
(* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(.f64 Om (+.f64 (/.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal -1/4 binary64) (.f64 l (sin.f64 kx)))))
(* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(.f64 Om (+.f64 (/.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal -1/4 binary64) (.f64 l (sin.f64 kx)))))
(* Om (- (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(.f64 Om (+.f64 (/.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal -1/4 binary64) (.f64 l (sin.f64 kx)))))
(* -1/4 (/ Om (* l (sin kx))))
(/.f64 (.f64 #s(literal -1/4 binary64) Om) (.f64 l (sin.f64 kx)))
(* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om)))))
(.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 l (sin.f64 kx))) (/.f64 #s(literal -1/2 binary64) Om)) (neg.f64 Om))
(* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om)))))
(.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 l (sin.f64 kx))) (/.f64 #s(literal -1/2 binary64) Om)) (neg.f64 Om))
(* -1 (* Om (- (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om)))))
(.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 l (sin.f64 kx))) (/.f64 #s(literal -1/2 binary64) Om)) (neg.f64 Om))
(* -1/4 (/ Om (* l (sin kx))))
(/.f64 (.f64 #s(literal -1/4 binary64) Om) (.f64 l (sin.f64 kx)))
(/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l)
(/.f64 (fma.f64 l #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 Om (sin.f64 kx)))) l)
(/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l)
(/.f64 (fma.f64 l #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 Om (sin.f64 kx)))) l)
(/ (+ (* -1/4 (/ Om (sin kx))) (* 1/2 l)) l)
(/.f64 (fma.f64 l #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 Om (sin.f64 kx)))) l)
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(* -1/4 (/ Om (* kx l)))
(/.f64 (.f64 #s(literal -1/4 binary64) Om) (.f64 l kx))
(/ (+ (* -1/4 (/ Om l)) (* 1/2 kx)) kx)
(/.f64 (fma.f64 kx #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 Om l))) kx)
(/ (+ (* -1/4 (/ Om l)) (* kx (+ 1/2 (* -1/24 (/ (* Om kx) l))))) kx)
(/.f64 (fma.f64 kx (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 kx Om) l) #s(literal 1/2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 Om l))) kx)
(/ (+ (* -1/4 (/ Om l)) (* kx (+ 1/2 (* kx (+ (* -1/24 (/ Om l)) (* 1/4 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))))) kx)
(/.f64 (fma.f64 kx (fma.f64 kx (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 kx kx) (.f64 (/.f64 Om l) #s(literal -7/360 binary64))) (/.f64 (.f64 #s(literal -1/24 binary64) Om) l)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 Om l))) kx)
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (/ Om (* l (sin kx)))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (/.f64 (.f64 #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))) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 Om Om)))) (.f64 #s(literal -1/4 binary64) (fma.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (.f64 #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))) (*.f64 Om Om))) #s(literal 1 binary64))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (.f64 (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 Om (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (.f64 (.f64 l (.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (.f64 #s(literal 1/128 binary64) (.f64 Om Om)) (.f64 (.f64 l (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om (.f64 Om Om))) (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (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/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (-.f64 (.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l l)))) (.f64 #s(literal -1/512 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal -1/128 binary64) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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/4 binary64) (fma.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1/2 binary64))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1/2 binary64))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1/2 binary64))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))))
(/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)
(/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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)))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)
(/.f64 (fma.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 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 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (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 4 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) l)
(* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))))
(* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))
(/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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)))))) (neg.f64 l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) (neg.f64 l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l))
(/.f64 (fma.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 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 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (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 4 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) (neg.f64 l))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))))
(* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 3/512 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (pow.f64 l #s(literal 5 binary64))) (.f64 (.f64 #s(literal -5/4096 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 7 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 7 binary64)))))) (.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 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))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 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))) (*.f64 Om Om))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(.f64 l (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 l (fma.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(neg.f64 (.f64 l (fma.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om Om) l)) (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 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (.f64 #s(literal 4 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 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) Om) (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))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))) #s(literal 1/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 (.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)))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(+.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 #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) #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 (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) (fma.f64 (*.f64 kx kx) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) (.f64 ky ky)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 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/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 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))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 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))) (*.f64 Om Om))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(.f64 l (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 l (fma.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(neg.f64 (.f64 l (fma.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om Om) l)) (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 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 kx kx)) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 kx kx)) Om) (/.f64 l Om))))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (/.f64 (.f64 #s(literal 2/45 binary64) (.f64 l (*.f64 kx kx))) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 ky ky)) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 ky ky)) Om) (/.f64 l Om))))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (/.f64 (.f64 l (.f64 ky ky)) Om) (/.f64 (*.f64 #s(literal -1/3 binary64) l) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* kx l))
(/.f64 Om (*.f64 l kx))
(/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx)
(/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 Om (.f64 kx kx)) l) (/.f64 Om l)) kx)
(/ (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (/.f64 Om l) #s(literal 7/360 binary64)) (.f64 (/.f64 Om l) #s(literal 1/6 binary64))) (/.f64 Om l)) kx)
(/ (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (fma.f64 (/.f64 Om l) #s(literal 1/840 binary64) (.f64 (.f64 (/.f64 Om l) #s(literal -7/360 binary64)) #s(literal 1/6 binary64))) (neg.f64 (.f64 kx kx)) (.f64 (/.f64 Om l) #s(literal 7/360 binary64))) (*.f64 (/.f64 Om l) #s(literal 1/6 binary64))) (/.f64 Om l)) kx)
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(/ Om (* l (sin kx)))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* kx l)
(*.f64 l kx)
(* kx (+ l (* -1/6 (* (pow kx 2) l))))
(.f64 kx (fma.f64 (.f64 l (*.f64 kx kx)) #s(literal -1/6 binary64) l))
(* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* 1/120 (* (pow kx 2) l))))))
(.f64 kx (fma.f64 (.f64 kx kx) (.f64 l (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64))) l))
(* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* (pow kx 2) (+ (* -1/5040 (* (pow kx 2) l)) (* 1/120 l)))))))
(.f64 kx (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 l (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64))) (.f64 l #s(literal -1/6 binary64))) l))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* l (sin kx))
(*.f64 l (sin.f64 kx))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(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))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 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))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 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))) (*.f64 Om Om))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(.f64 l (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 l (fma.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(neg.f64 (.f64 l (fma.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om Om) l)) (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 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 ky ky)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64)))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 kx kx)) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 kx kx)) Om) (/.f64 l Om))))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (/.f64 (.f64 #s(literal 2/45 binary64) (.f64 l (*.f64 kx kx))) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 ky ky)) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 ky ky)) Om) (/.f64 l Om))))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (/.f64 (.f64 l (.f64 ky ky)) Om) (/.f64 (*.f64 #s(literal -1/3 binary64) l) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (.f64 l (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))) Om)

rewrite291.0ms (2%)

Memory

-11.3MiB live, 490.5MiB allocated

Rules

4 804×	`lower-*.f32`
4 780×	`lower-*.f64`
4 448×	`lower-fma.f32`
4 438×	`lower-fma.f64`
2 324×	`lower-pow.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	96	749
0	144	753
1	593	676
2	5467	676
0	8763	638

Stop Event

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

Counts

26 → 455

Calls

Call 1

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

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

eval215.0ms (1.5%)

Memory: 8.7MiB live, 476.0MiB allocated
Compiler: Compiled 71 649 to 4 557 computations (93.6% saved)

prune248.0ms (1.7%)

Memory

22.0MiB live, 257.9MiB allocated

Pruning

8 alts after pruning (4 fresh and 4 done)

	Pruned	Kept	Total
New	1 490	4	1 494
Fresh	2	0	2
Picked	2	3	5
Done	0	1	1
Total	1 494	8	1 502

Accuracy

100.0%

Counts

1 502 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	77.2%	(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
▶	91.8%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
✓	79.0%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
▶	75.3%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))))
▶	46.6%	(sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))))
✓	36.1%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))))
✓	59.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
✓	58.0%	#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Compiler

Compiled 177 to 126 computations (28.8% saved)

simplify435.0ms (3%)

Memory

0.5MiB live, 328.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 16 expressions of interest:

New	Metric	Score
cost-diff	0	(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))
cost-diff	0	(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))
cost-diff	0	(sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))))
cost-diff	0	(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
cost-diff	0	(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))
cost-diff	0	(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
cost-diff	0	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
cost-diff	384	(/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om)
cost-diff	0	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))))
cost-diff	320	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))
cost-diff	384	(fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	0	(*.f64 #s(literal 1/4 binary64) (/.f64 Om l))
cost-diff	0	(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
cost-diff	0	#s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))
cost-diff	0	(sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))))

Rules

18 742×	`lower-fma.f32`
18 730×	`lower-fma.f64`
5 038×	`lower-*.f32`
5 012×	`lower-*.f64`
3 194×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	81	1148
0	133	1148
1	231	1098
2	542	1052
3	1941	1052
4	4759	1052
5	6309	1052
6	6577	1052
7	6580	1052
8	6858	1052
9	6879	1052
10	6879	1052
0	8366	1027

Stop Event

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

Calls

Call 1

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

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

localize559.0ms (3.8%)

Memory

15.5MiB live, 441.4MiB allocated

Localize:

Found 16 expressions of interest:

New	Metric	Score
accuracy	10.473051147342145	(sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))
accuracy	10.513163891524382	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	13.39641785001472	#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))
accuracy	15.031710340006303	(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)))
accuracy	2.273431961762105	(/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om)
accuracy	10.473051147342145	(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))
accuracy	10.513163891524382	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	13.39641785001472	#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))
accuracy	2.2740628327922403	(.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))
accuracy	10.473051147342145	(sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))
accuracy	13.396417850014721	#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))
accuracy	48.96824608447398	#s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))
accuracy	0.5441482949104423	(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
accuracy	2.728312917802285	(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))))
accuracy	10.336597068049207	(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))
accuracy	29.412020457322512	#s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))

Samples

250.0ms	204×	0	valid
43.0ms	31×	1	valid
41.0ms	21×	2	valid

Compiler

Compiled 931 to 79 computations (91.5% saved)

Precisions

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

ival-mult: 101.0ms (37% of total)

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

ival-div: 41.0ms (15% of total)

ival-add: 39.0ms (14.3% of total)

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

adjust: 9.0ms (3.3% of total)

exact: 1.0ms (0.4% of total)

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

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

series330.0ms (2.3%)

Memory

-4.8MiB live, 295.7MiB allocated

Counts

28 → 1 032

Calls

Call 1

Inputs
#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (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)) (patch (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)) #<representation binary64>) () ())
#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())
#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())
#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())

Outputs
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2))))))) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/8 (* (/ (* Om (pow kx 2)) l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))) (* (pow kx 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* 1/8 (* (/ (* Om (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))) (* (pow kx 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* (pow kx 2) (+ (* -1/8 (* (/ (* Om (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 4))))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))) (* 1/8 (* (/ (* Om (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/8 (* (/ (* Om (pow ky 2)) l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))) (* (pow ky 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* 1/8 (* (/ (* Om (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))) (* (pow ky 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* (pow ky 2) (+ (* -1/8 (* (/ (* Om (* (pow ky 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 4))))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))) (* 1/8 (* (/ (* Om (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf Om) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor 0 l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ Om l)) (taylor -inf l) (#s(alt (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (patch (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)))))) (patch (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3)))))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) (patch (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (patch (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (patch (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3)))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))))))))))) (taylor 0 Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))) (taylor -inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))) (taylor -inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf Om) (#s(alt (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 2) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))) (sqrt 2)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/32 (/ (pow Om 2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/32 (/ (pow Om 2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (pow l 3)))))) (taylor inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* 1/32 (/ (pow Om 2) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) l)) (* -1/32 (/ (pow Om 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* Om (+ (* -1/32 (/ Om (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (* Om (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))))) (* 1/32 (/ 1 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 2) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2)))) (* (pow Om 6) (sqrt 2))))))) (taylor inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 2) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2)))) (* (pow Om 6) (sqrt 2))))))) (taylor -inf Om) (#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor -inf kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt 2 (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt 2 (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt 2 (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (pow kx 2))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (+ 1 (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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))))) (taylor 0 kx) (#s(alt (fma.f64 #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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (pow ky 2))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))))) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 4)))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))) (* 1/2 (* (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))))))))) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (taylor 0 ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* -1/2 (* (pow ky 2) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))))) (taylor 0 ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (* 1/2 (* (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))) (taylor 0 ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (* (pow ky 2) (+ (* -1/2 (* (* (pow ky 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 4)))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))) (* 1/2 (* (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))))))))) (taylor 0 ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (* -2 ky))) (taylor 0 kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (* -2 ky)) (* -2 (pow kx 2)))) (taylor 0 kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (* -2 ky)) (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))) (taylor 0 kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (* -2 ky)) (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))) (taylor 0 kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (* -2 kx))) (taylor 0 ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (* -2 kx)) (* -2 (pow ky 2)))) (taylor 0 ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (* -2 kx)) (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))) (taylor 0 ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (* -2 kx)) (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))) (taylor 0 ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/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 (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/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 (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)) (patch #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2))) (taylor 0 kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (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 (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor -inf kx) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om) (taylor -inf ky) (#s(alt (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (patch (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2))) (taylor 0 kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))) (taylor 0 ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (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 (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) (patch #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf l) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor 0 Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow l 2) (pow Om 2))) (taylor -inf Om) (#s(alt (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) (patch (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())

Calls

258 calls:

Time	Variable		Point	Expression
25.0ms	ky	@	0	(sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2))
17.0ms	kx	@	0	(+ (* (* 1/4 (/ Om l)) (sqrt (/ 1 (+ (* -1/2 (+ (cos (* kx -2)) (cos (* ky -2)))) 1)))) 1/2)
15.0ms	Om	@	inf	(sqrt (+ 1 (/ 1 (sqrt (+ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* (* l l) (/ 4 (* Om Om)))) 1)))))
3.0ms	ky	@	0	(+ (* (* 1/4 (/ Om l)) (sqrt (/ 1 (+ (* -1/2 (+ (cos (* kx -2)) (cos (* ky -2)))) 1)))) 1/2)
2.0ms	kx	@	inf	(+ (* (* 1/4 (/ Om l)) (sqrt (/ 1 (+ (* -1/2 (+ (cos (* kx -2)) (cos (* ky -2)))) 1)))) 1/2)

simplify719.0ms (4.9%)

Memory

-9.4MiB live, 800.3MiB allocated

Algorithm

1×	egg-herbie

Rules

9 754×	`lower-*.f64`
9 754×	`lower-*.f32`
7 434×	`lower-fma.f64`
7 434×	`lower-fma.f32`
5 628×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1485	58512
1	4920	58089
0	9541	53789

Stop Event

1×	iter limit
1×	node limit

Counts

1 032 → 1 032

Calls

Call 1

Inputs
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))
(/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l)
(/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l)
(/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l)
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))
(+ 1/2 (+ (* -1/8 (* (/ (* Om (pow kx 2)) l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))) (* (pow kx 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* 1/8 (* (/ (* Om (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))) (* (pow kx 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* (pow kx 2) (+ (* -1/8 (* (/ (* Om (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 4))))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))) (* 1/8 (* (/ (* Om (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))
(+ 1/2 (+ (* -1/8 (* (/ (* Om (pow ky 2)) l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))) (* (pow ky 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* 1/8 (* (/ (* Om (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))) (* (pow ky 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* (pow ky 2) (+ (* -1/8 (* (/ (* Om (* (pow ky 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 4))))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))) (* 1/8 (* (/ (* Om (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
(* 1/4 (/ Om l))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
1
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
1
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)
(* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(sqrt 1/2)
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))))))))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt 1/2) (sqrt 2))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt 2)
(+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))))
(+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))))))
(+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))) (sqrt 2))))))))
1
(+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (+ (* -1/32 (/ (pow Om 2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1 (+ (* -1/32 (/ (pow Om 2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (pow l 3))))))
1
(+ 1 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (* -1 (/ (+ (* 1/32 (/ (pow Om 2) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) l)) (* -1/32 (/ (pow Om 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
1
(+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (* Om (+ (* -1/32 (/ Om (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (* Om (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))))) (* 1/32 (/ 1 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(sqrt 2)
(+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2))))))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2)))) (* (pow Om 6) (sqrt 2)))))))
(sqrt 2)
(+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2))))))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2)))) (* (pow Om 6) (sqrt 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
1
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
1
(+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
1
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (pow kx 2)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (pow ky 2)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 4)))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))) (* 1/2 (* (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))))))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* -1/2 (* (pow ky 2) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (* 1/2 (* (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (* (pow ky 2) (+ (* -1/2 (* (* (pow ky 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 4)))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))) (* 1/2 (* (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))))))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(+ 1 (cos (* -2 ky)))
(+ 1 (+ (cos (* -2 ky)) (* -2 (pow kx 2))))
(+ 1 (+ (cos (* -2 ky)) (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2))))
(+ 1 (+ (cos (* -2 ky)) (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ 1 (cos (* -2 kx)))
(+ 1 (+ (cos (* -2 kx)) (* -2 (pow ky 2))))
(+ 1 (+ (cos (* -2 kx)) (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2))))
(+ 1 (+ (cos (* -2 kx)) (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+ (cos (* -2 kx)) (cos (* -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 (* -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))) (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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(+ 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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (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 (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(* 4 (/ (pow l 2) (pow Om 2)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))

Outputs
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.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/2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 Om Om)) (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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)) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 Om Om)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))) #s(literal 1 binary64))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))) #s(literal 1/512 binary64))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (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 Om (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal 1/128 binary64) (.f64 Om Om)) (.f64 (.f64 l (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))) #s(literal 1/512 binary64))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (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/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (.f64 l (.f64 l l)))) #s(literal 1/512 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal -1/128 binary64) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (/.f64 (.f64 l l) (.f64 Om Om))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (.f64 (.f64 kx kx) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))
(.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (/.f64 #s(literal 1/2 binary64) Om)))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))
(.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (/.f64 #s(literal 1/2 binary64) Om)))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om))))
(.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (/.f64 #s(literal 1/2 binary64) Om)))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (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)))) l) (/.f64 #s(literal -1/2 binary64) Om)) (neg.f64 Om))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (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)))) l) (/.f64 #s(literal -1/2 binary64) Om)) (neg.f64 Om))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (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)))) l) (/.f64 #s(literal -1/2 binary64) Om)) (neg.f64 Om))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))))
(/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) Om) (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 l #s(literal 1/2 binary64))) l)
(/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) Om) (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 l #s(literal 1/2 binary64))) l)
(/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 l)) l)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) Om) (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 l #s(literal 1/2 binary64))) l)
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/8 (* (/ (* Om (pow kx 2)) l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64)))))) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (.f64 kx kx)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))) (* (pow kx 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* 1/8 (* (/ (* Om (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 Om (.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) l) (sqrt.f64 (+.f64 #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/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))) (* (pow kx 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (* (pow kx 2) (+ (* -1/8 (* (/ (* Om (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 4))))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))) (* 1/8 (* (/ (* Om (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 Om (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 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 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 4 binary64)))))) l)) (sqrt.f64 (+.f64 #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/8 binary64) (/.f64 (.f64 (.f64 Om (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 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))))) l))) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/8 (* (/ (* Om (pow ky 2)) l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 Om (.f64 ky ky)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))) (* (pow ky 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* 1/8 (* (/ (* Om (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om (.f64 ky ky)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64))))) l)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))))))
(+ 1/2 (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))) (* (pow ky 2) (+ (* -1/8 (* (/ Om l) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (* (pow ky 2) (+ (* -1/8 (* (/ (* Om (* (pow ky 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 4))))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))) (* 1/8 (* (/ (* Om (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) l) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 Om (.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 4 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))) l) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #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 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))) l))) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))))))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
(* 1/4 (/ Om l))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) l)
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (fma.f64 (.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 4 binary64) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (fma.f64 (.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 4 binary64) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (fma.f64 (.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 4 binary64) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (fma.f64 (.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 4 binary64) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (fma.f64 (.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 4 binary64) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (.f64 l l) (/.f64 (fma.f64 (.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 4 binary64) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (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 Om Om)) (.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 kx kx) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (*.f64 Om Om)) #s(literal -4/3 binary64))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) #s(literal 8/45 binary64) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 Om Om))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 Om Om)) (.f64 #s(literal -4/3 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (*.f64 Om Om))))))))
(+ 1 (+ (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal 8/45 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (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)) (neg.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (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)) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (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)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 l l) (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))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64)) (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #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 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))) l))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64))) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #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)))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (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)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (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)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 (.f64 kx kx) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 l l) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.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/2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 Om Om)) (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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)) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 Om Om)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))) #s(literal 1 binary64))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))))
(+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))) #s(literal 1/512 binary64))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (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 Om (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal 1/128 binary64) (.f64 Om Om)) (.f64 (.f64 l (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)))) #s(literal 1/512 binary64))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) (.f64 Om Om)) (.f64 (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/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 l (sqrt.f64 #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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal -1/128 binary64) Om) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (.f64 l (.f64 l l)))) #s(literal 1/512 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal -1/128 binary64) (.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #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))))) (.f64 #s(literal 1/8 binary64) (/.f64 (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 l (sqrt.f64 #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64)))))))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (/.f64 (.f64 l l) (.f64 Om Om))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (.f64 (.f64 kx kx) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1/2 binary64))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (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)) (neg.f64 (*.f64 Om Om)))) #s(literal 1/2 binary64))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal -1/4 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))))) (/.f64 (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 Om Om))) #s(literal 1/2 binary64))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))))
(/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)
(/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 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 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (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 4 binary64)))) (sqrt.f64 (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 Om (pow.f64 l #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))) l)
(* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))))
(* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (neg.f64 l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) (neg.f64 l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 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 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (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 4 binary64)))) (sqrt.f64 (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 Om (pow.f64 l #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal -1/32 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))) (neg.f64 l))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))))
(* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) (.f64 (.f64 #s(literal 3/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 #s(literal 3/512 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (pow.f64 l #s(literal 5 binary64))) (.f64 (.f64 #s(literal -5/4096 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 7 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 7 binary64)))))) (.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 Om Om))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (*.f64 Om Om)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (.f64 l l) (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))) (neg.f64 (.f64 Om Om)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal -1/4 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow kx 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 (.f64 kx kx) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow kx 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 (.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 l l) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (* -1 (* (/ (* (pow ky 2) (* (pow l 2) (sqrt 1/2))) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(+ (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1 (* (/ (* (pow l 2) (sqrt 1/2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (* 1/2 (* (* (pow ky 2) (* (sqrt 1/2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))))) (.f64 (/.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (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)) (neg.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (-.f64 (.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (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)) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (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)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (.f64 (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 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 l l) (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))))))
(+ (sqrt 1/2) (+ (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) (pow l 3))))))
(+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64)) (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #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 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))) l))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (sqrt.f64 #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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64))) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 Om Om) (sqrt.f64 #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)))) l)) l))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l))) (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)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* -1/32 (/ (* Om (sqrt 1/2)) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (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)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* Om (+ (* 1/4 (* (/ (sqrt 1/2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (+ (* -1/32 (/ (sqrt 1/2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* Om (* (sqrt 1/2) (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64))) (/.f64 (.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 l l) (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 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (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)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 l l) (sqrt.f64 #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))) (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 kx kx) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 l l) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1 (* (/ (* (pow l 2) (- (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (/ (pow l 4) (* (pow Om 4) (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow Om 2) (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 ky ky) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (/.f64 (.f64 (.f64 (.f64 l l) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (neg.f64 (/.f64 (.f64 l l) (.f64 Om Om))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (sqrt 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (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)) (neg.f64 (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2)))) (sqrt 2))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 (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)) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 Om Om)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (pow.f64 (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 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (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)) (neg.f64 (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/32 (/ (pow Om 2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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 #s(literal -1/32 binary64) (.f64 Om Om)) (.f64 (.f64 l l) (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))))))
(+ 1 (+ (* -1/32 (/ (pow Om 2) (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) (pow l 3))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 Om Om) (.f64 (.f64 l l) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64)) (.f64 l (.f64 l l))) (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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))))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (* -1 (/ (+ (* 1/32 (/ (pow Om 2) (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 Om (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 #s(literal 1/32 binary64) (.f64 Om Om)) (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))) l))) l))
(+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))) l)) (* -1/32 (/ (pow Om 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) Om) (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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 Om (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))) #s(literal -3/64 binary64)) l) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 Om Om)) (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)))) l)) l))
1
#s(literal 1 binary64)
(+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) Om) l) (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)))) #s(literal 1 binary64))
(+ 1 (* Om (+ (* -1/32 (/ Om (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (/.f64 (.f64 #s(literal -1/32 binary64) Om) (.f64 (.f64 l l) (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))
(+ 1 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (* Om (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))))))) (* 1/32 (/ 1 (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(fma.f64 Om (fma.f64 Om (fma.f64 (.f64 #s(literal 1/2 binary64) Om) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -3/64 binary64)) (/.f64 #s(literal -1/32 binary64) (.f64 (.f64 l l) (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/4 binary64) (/.f64 (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)))) l))) #s(literal 1 binary64))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2))))))
(+.f64 (fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2)))) (* (pow Om 6) (sqrt 2)))))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 l l) (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 Om Om) (sqrt.f64 #s(literal 2 binary64))))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))))
(fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2))))))
(+.f64 (fma.f64 (.f64 l l) (/.f64 (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)) (neg.f64 (.f64 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))) (* (pow Om 4) (sqrt 2)))) (* 1/2 (/ (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* -1 (/ (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))) (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2)))) (* (pow Om 6) (sqrt 2)))))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 l l) (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))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 l l) (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 Om Om) (sqrt.f64 #s(literal 2 binary64))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (fma.f64 (.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 -2 binary64) #s(literal -2 binary64)) (.f64 Om Om))) #s(literal 2 binary64))
(+ 2 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (/.f64 (fma.f64 (.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 -2 binary64) #s(literal -2 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (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 Om l)) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 5 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) l))
(+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64))))) l))
1
#s(literal 1 binary64)
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))) #s(literal 1 binary64))
(+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) #s(literal 1 binary64))
(+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))))))))
(fma.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/16 binary64) (.f64 (.f64 #s(literal 3/256 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l))) #s(literal 1 binary64))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (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 Om Om))))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 2 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))
(fma.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))
(fma.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (.f64 l l) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -4/3 binary64) (.f64 l l)) (.f64 (.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 #s(literal 16/3 binary64) (pow.f64 l #s(literal 4 binary64))) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))))))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 l l)) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (fma.f64 (.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 -2 binary64) #s(literal -2 binary64)) (.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 Om Om)) (/.f64 (.f64 #s(literal 64 binary64) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (.f64 (/.f64 (pow.f64 (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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (/.f64 (fma.f64 (.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 -2 binary64) #s(literal -2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l)
(/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l)
(/.f64 (-.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 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 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (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 4 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (neg.f64 (sqrt.f64 (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64))))) l)
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal -1/2 binary64) (/.f64 Om l)) (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)))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))) l))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))) l))
(/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) l))
(/.f64 (-.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 Om Om) (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 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 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (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 4 binary64)))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (neg.f64 (sqrt.f64 (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 Om (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 #s(literal -1/16 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64))))))) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (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 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (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 Om (pow.f64 l #s(literal 4 binary64))))) (neg.f64 l))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))
(.f64 (.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (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)))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 Om (fma.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/16 binary64) (.f64 (.f64 #s(literal 3/256 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))))
(.f64 Om (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 (.f64 (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 7 binary64))))) #s(literal -5/2048 binary64) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (pow.f64 l #s(literal 5 binary64))) #s(literal 3/256 binary64))) (.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/16 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (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)))) l))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (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 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))
(+.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (+ (* -16 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 l l) (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 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64))) (.f64 (.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (* -1/2 (+ 1 (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 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (pow kx 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 kx kx (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.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 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (pow ky 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (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 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(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))
(sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))))) (sqrt (+ 1 (* -1/2 (+ 1 (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 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 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)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 4)))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))) (* 1/2 (* (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 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 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 4 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* -1/2 (* (pow ky 2) (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (* 1/2 (* (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #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 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))))
(+ (sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (* (pow ky 2) (+ (* -1/2 (* (* (pow ky 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))))) (+ (* 2/45 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3))) (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 4)))))) (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))) (* 1/2 (* (sqrt (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (+ (* 1/3 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 2))) (* 3/4 (/ 1 (pow (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) 3)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 4 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #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 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal -1/2 binary64))))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
(+ 1 (cos (* -2 ky)))
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(+ 1 (+ (cos (* -2 ky)) (* -2 (pow kx 2))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) #s(literal -2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(+ 1 (+ (cos (* -2 ky)) (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 2/3 binary64) #s(literal -2 binary64)) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))
(+ 1 (+ (cos (* -2 ky)) (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2))))
(+.f64 #s(literal 1 binary64) (fma.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)) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #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)) (* -2 (pow ky 2))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (.f64 ky ky) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(+ 1 (+ (cos (* -2 kx)) (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2))))
(+.f64 #s(literal 1 binary64) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/3 binary64) #s(literal -2 binary64)) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ 1 (+ (cos (* -2 kx)) (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2))))
(+.f64 #s(literal 1 binary64) (fma.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)) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (.f64 kx #s(literal -2 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 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) (.f64 ky ky)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.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 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (/.f64 (fma.f64 #s(literal 2 binary64) (.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 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(.f64 l (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(neg.f64 (.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(.f64 (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))) (neg.f64 l))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om Om) l)) (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 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (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 Om Om) (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/64 binary64) (.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 l l) (.f64 Om Om))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om) (/ (* (pow kx 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 kx kx)) Om))
(+ (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 kx kx)) Om) (/.f64 l Om))))
(+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow kx 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 ky))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (/.f64 (.f64 l (.f64 kx kx)) Om) (/.f64 (*.f64 #s(literal -1/3 binary64) l) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om)
(/.f64 (.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(+ (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om) (/ (* (pow ky 2) l) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (.f64 l (*.f64 ky ky)) Om))
(+ (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) l) Om)) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 l (*.f64 ky ky)) Om) (/.f64 l Om))))
(+ (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ l Om)) (* 2/45 (/ (* (pow ky 2) l) Om)))) (/ l Om))) (/ (* l (+ 1/2 (* -1/2 (cos (* 2 kx))))) Om))
(fma.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 l Om) (/.f64 (.f64 #s(literal 2/45 binary64) (.f64 l (*.f64 ky ky))) Om)) (/.f64 l Om))))
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(/ (* l (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) Om)
(/.f64 (fma.f64 l (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) l) Om)
(+ 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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (pow ky 2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) (.f64 ky ky)))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 kx))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 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 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))
(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))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.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 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (/.f64 (fma.f64 #s(literal 2 binary64) (.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 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(.f64 l (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(neg.f64 (.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(.f64 (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))) (neg.f64 l))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om Om) l)) (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 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (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 Om Om) (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/64 binary64) (.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 l l) (.f64 Om Om))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 kx kx)) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 (.f64 l l) (.f64 Om Om))) (.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 kx)))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 ky ky) (/.f64 (.f64 l l) (.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l l) (.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))) (.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 8/45 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal -4/3 binary64) (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64))))))) (.f64 (.f64 Om Om) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 Om Om)) #s(literal 1 binary64)))))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (neg (* -2 ky)))) (* -1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (.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 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (.f64 l l) (fma.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (pow.f64 (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 3 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 (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 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (/.f64 (fma.f64 #s(literal 2 binary64) (.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 2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))
(.f64 l (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))
(.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))) (neg.f64 l))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))))))
(neg.f64 (.f64 l (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))))
(.f64 (fma.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om (.f64 Om Om)) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (fma.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (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))) Om) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 l l))) (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)))))))) (neg.f64 l))
(* 2 (* (/ l Om) (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (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))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om Om) l)) (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 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (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 Om Om) (fma.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l) (.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 Om Om) (.f64 l (.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))))))) Om)
(/ (+ (* 2 (* l (sqrt (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (.f64 Om Om) (fma.f64 (.f64 Om Om) (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 3 binary64)))) (.f64 l (.f64 l l))) #s(literal -1/64 binary64) (.f64 (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (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 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (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)))) l))) (.f64 (.f64 #s(literal 2 binary64) l) (sqrt.f64 (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))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (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 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (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 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 l l) (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 Om Om)))))

rewrite275.0ms (1.9%)

Memory

19.9MiB live, 413.1MiB allocated

Rules

3 968×	`lower-*.f32`
3 942×	`lower-*.f64`
3 210×	`lower-fma.f32`
3 198×	`lower-fma.f64`
3 030×	`lower-pow.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	81	841
0	133	840
1	509	792
2	4340	762
0	8307	717

Stop Event

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

Counts

28 → 468

Calls

Call 1

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

Outputs
(exp.f64 (.f64 (log.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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)))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))))
(pow.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))) #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 #s(approx (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))) #s(literal 1/4 binary64)))
#s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (/.f64 (.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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/4 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))))
(fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))
(fma.f64 (/.f64 Om l) (.f64 #s(literal 1/4 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))))) #s(literal 1/2 binary64))
(fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (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)))) #s(literal 1/2 binary64))
(fma.f64 (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/4 binary64) (/.f64 Om l)) #s(literal 1/2 binary64))
(fma.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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/4 binary64) #s(literal 1/2 binary64))
(fma.f64 (.f64 (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)))) #s(literal 1/4 binary64)) (/.f64 Om l) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))))))) (fma.f64 #s(literal 1/64 binary64) (pow.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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)) (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (*.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/64 binary64) (pow.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (fma.f64 #s(literal 1/64 binary64) (pow.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal -1/4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (neg.f64 (fma.f64 #s(literal 1/64 binary64) (pow.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (neg.f64 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (-.f64 #s(literal 1/4 binary64) (.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))))) (-.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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)))))))
(pow.f64 (/.f64 (-.f64 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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))))))) (fma.f64 #s(literal 1/64 binary64) (pow.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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)) (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (*.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(.f64 (fma.f64 #s(literal 1/64 binary64) (pow.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 Om #s(literal 1/4 binary64)) #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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 (fma.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 #s(literal 1/4 binary64) (/.f64 Om l)) (.f64 #s(literal 1/4 binary64) (/.f64 Om l))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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) (/.f64 l (*.f64 Om #s(literal 1/4 binary64))))
(/.f64 #s(literal 1/4 binary64) (/.f64 l Om))
(/.f64 (*.f64 Om #s(literal 1/4 binary64)) l)
(/.f64 (neg.f64 (*.f64 Om #s(literal 1/4 binary64))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1/4 binary64) (neg.f64 Om)) (neg.f64 l))
(/.f64 (*.f64 (neg.f64 Om) #s(literal 1/4 binary64)) (neg.f64 l))
(pow.f64 (/.f64 l (*.f64 Om #s(literal 1/4 binary64))) #s(literal -1 binary64))
(.f64 Om (.f64 (/.f64 #s(literal 1 binary64) l) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/4 binary64) (/.f64 Om l))
(*.f64 (/.f64 Om l) #s(literal 1/4 binary64))
(.f64 (.f64 Om #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) l))
#s(literal 1/2 binary64)
(+.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))
(+.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))
(-.f64 (/.f64 (.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))))) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal -1 binary64))))
(fma.f64 #s(literal 4 binary64) (.f64 (/.f64 l Om) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))) #s(literal 1 binary64))
(fma.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))) #s(literal 1 binary64))
(fma.f64 l (.f64 (/.f64 #s(literal 4 binary64) Om) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))) #s(literal 1 binary64))
(fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))
(fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) (.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (.f64 (.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (/.f64 l (.f64 Om #s(literal 1/4 binary64)))) #s(literal 1 binary64))
(fma.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))
(fma.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) (.f64 (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 l (*.f64 Om #s(literal 1/4 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 4 binary64) Om) (.f64 l (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))) #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om) (.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) l) (/.f64 #s(literal 4 binary64) Om) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) (/.f64 #s(literal 4 binary64) Om)) l #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))))) (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (*.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal -1 binary64)) (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal -1 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))))
(/.f64 (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
(/.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal -1 binary64)) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal -1 binary64)))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64))) (neg.f64 (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
(/.f64 (neg.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal -1 binary64))) (neg.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))))
(pow.f64 (/.f64 (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))))) (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (*.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal -1 binary64)) (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(.f64 (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal -1 binary64))))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))
(/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))
(/.f64 (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)) #s(literal -3/2 binary64))) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))
(.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))))))
(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (.f64 l l)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om (neg.f64 Om))))
(neg.f64 (/.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om) (neg.f64 Om)))
(neg.f64 (/.f64 (.f64 (.f64 l l) #s(literal -4 binary64)) (*.f64 Om Om)))
(neg.f64 (/.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om)) Om))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64)))
(/.f64 (/.f64 l (*.f64 Om #s(literal 1/4 binary64))) (/.f64 Om l))
(/.f64 (.f64 l l) (.f64 Om (*.f64 Om #s(literal 1/4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l)))))
(/.f64 (.f64 (.f64 l l) #s(literal -4 binary64)) (*.f64 Om (neg.f64 Om)))
(/.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om)) (neg.f64 Om))
(/.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om) Om)
(/.f64 (.f64 #s(literal 1 binary64) (.f64 l l)) (.f64 Om (.f64 Om #s(literal 1/4 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 l l)) (.f64 (.f64 Om #s(literal 1/4 binary64)) Om))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) l) #s(literal 1 binary64)) (*.f64 Om (/.f64 Om l)))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal -4 binary64))) (neg.f64 (*.f64 Om (neg.f64 Om))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) #s(literal 1 binary64)) (.f64 Om Om))
(/.f64 (.f64 (.f64 l l) #s(literal 1 binary64)) (.f64 Om (.f64 Om #s(literal 1/4 binary64))))
(/.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 binary64)) Om)
(/.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 l l) Om)) (*.f64 Om #s(literal 1/4 binary64)))
(/.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) Om)) (neg.f64 Om))
(pow.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (*.f64 Om Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (*.f64 l l) Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (.f64 l l)))
(.f64 l (/.f64 (.f64 #s(literal 4 binary64) l) (*.f64 Om Om)))
(.f64 l (.f64 (/.f64 #s(literal 4 binary64) Om) (/.f64 l Om)))
(.f64 l (.f64 (/.f64 l (*.f64 Om #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) Om)))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 #s(literal 1 binary64) (.f64 Om Om)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)))
(.f64 (/.f64 l Om) (/.f64 l (.f64 Om #s(literal 1/4 binary64))))
(.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) (/.f64 l Om))
(.f64 (/.f64 #s(literal 4 binary64) Om) (/.f64 (.f64 l l) Om))
(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)))
(.f64 (/.f64 #s(literal 4 binary64) (.f64 Om Om)) (*.f64 l l))
(.f64 (.f64 (.f64 l l) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om (neg.f64 Om))))
(.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om)) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(.f64 (/.f64 (.f64 l l) Om) (/.f64 #s(literal 4 binary64) Om))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (.f64 #s(literal 4 binary64) (.f64 l l)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (.f64 l l))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om))
(.f64 (/.f64 #s(literal 1 binary64) Om) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om)) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 #s(literal 4 binary64) l) (*.f64 Om Om)) l)
(.f64 (.f64 #s(literal 4 binary64) l) (.f64 l (/.f64 #s(literal 1 binary64) (.f64 Om Om))))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))
(.f64 (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om) (/.f64 #s(literal 1 binary64) Om))
(.f64 (/.f64 (.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(/.f64 (sqrt.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(/.f64 (sqrt.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64))))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64))) (neg.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 2 binary64))))
(pow.f64 (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 (log1p.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/2 binary64) (.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (.f64 (log1p.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
(sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(pow.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(exp.f64 (.f64 (log1p.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(/.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (sqrt.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log1p.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))) (/.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal 1 binary64))
(fma.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))))))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64))) (+.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (neg.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(pow.f64 (/.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(exp.f64 (.f64 #s(literal -1/2 binary64) (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))))))
(exp.f64 (.f64 (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))))))
(.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal -1/4 binary64)))
(.f64 (pow.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))))))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))
(+.f64 (.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 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(exp.f64 (log1p.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))
(-.f64 (/.f64 (pow.f64 (.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 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))) (/.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))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #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))
(fma.f64 #s(literal -1/2 binary64) (.f64 (+.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 binary64) (.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))
(fma.f64 (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 binary64)))
(fma.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 kx ky)) #s(literal 1/2 binary64))) (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 kx ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (.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 binary64) (.f64 (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 kx ky)) #s(literal 1/2 binary64))) (cos.f64 (.f64 (*.f64 #s(literal -2 binary64) (-.f64 kx ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (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) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (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)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 (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))
(/.f64 (neg.f64 (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))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.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 2 binary64)) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 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))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64))) (neg.f64 (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 #s(literal 1 binary64) (pow.f64 (.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 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))
(pow.f64 (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))
(pow.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))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (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)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(.f64 (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))
(.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 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))))
(exp.f64 (.f64 (neg.f64 (log1p.f64 (.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/2 binary64)))
(exp.f64 (.f64 (log1p.f64 (.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/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (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)))
(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) (sqrt.f64 (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) (/.f64 (sqrt.f64 (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)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (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 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (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)))))
(pow.f64 (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))
(pow.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))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (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))
(pow.f64 (/.f64 (sqrt.f64 (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)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (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/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))))
(.f64 (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)))) #s(literal 1 binary64))
(.f64 (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)))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 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 (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 (pow.f64 (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/4 binary64)) (pow.f64 (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/4 binary64)))
(.f64 (pow.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.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/2 binary64)))
(.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal -1/2 binary64)) (pow.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))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (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)))) #s(literal 1/2 binary64)) (pow.f64 (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)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 (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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))
(+.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (cos.f64 (.f64 kx #s(literal -2 binary64))))
(-.f64 (/.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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 ky #s(literal -2 binary64)))))) (-.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (-.f64 (cos.f64 (.f64 ky #s(literal -2 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 (pow.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.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 ky #s(literal -2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (-.f64 (cos.f64 (.f64 ky #s(literal -2 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 (pow.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (+.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 (+.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 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))
(/.f64 (-.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/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 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (-.f64 (cos.f64 (.f64 ky #s(literal -2 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 (neg.f64 (-.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/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 ky #s(literal -2 binary64)))))))) (neg.f64 (-.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64))))))
(/.f64 (-.f64 (+.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 #s(literal 2 binary64) (.f64 kx #s(literal -2 binary64))))))) (-.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (-.f64 (cos.f64 (.f64 ky #s(literal -2 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 (pow.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.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 ky #s(literal -2 binary64)))))))) #s(literal -1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 kx ky)) #s(literal 1/2 binary64))) (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 kx ky)) #s(literal 1/2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 kx ky)) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (.f64 ky #s(literal -2 binary64)) (.f64 kx #s(literal -2 binary64))) #s(literal 2 binary64)))))
(.f64 (.f64 (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 kx ky)) #s(literal 1/2 binary64))) (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 kx ky)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(.f64 (+.f64 (pow.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) (-.f64 (cos.f64 (.f64 ky #s(literal -2 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 (+.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/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 binary64) (-.f64 (cos.f64 (.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))
(.f64 (.f64 #s(literal 2 binary64) (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 kx ky)) #s(literal 1/2 binary64)))) (cos.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 kx ky)) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))
#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))
(exp.f64 (.f64 #s(literal 1/2 binary64) (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64))) (sqrt.f64 (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
(/.f64 (sqrt.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal -1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal -1 binary64))))
(pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (sqrt.f64 (fma.f64 (.f64 (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) (.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) (/.f64 l Om)) #s(literal 64 binary64))) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal -1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 l #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))))
(/.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) (/.f64 Om l))
(/.f64 (.f64 l #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) Om)
(/.f64 (neg.f64 (.f64 l #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (.f64 #s(literal 1 binary64) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) (/.f64 Om l))
(/.f64 (.f64 (neg.f64 l) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) (neg.f64 Om))
(pow.f64 (/.f64 Om (.f64 l #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))) #s(literal -1 binary64))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))
(.f64 l (/.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) Om))
(.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))
(.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) (/.f64 l Om))
(.f64 (.f64 l #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) (/.f64 #s(literal 1 binary64) Om))
#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+.f64 #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 (-.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 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64))) (fma.f64 (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #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 (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 ky #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal -1/8 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 (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 ky #s(literal -2 binary64)))))) #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 (-.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 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64))) (fma.f64 (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #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/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 (pow.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #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 #s(literal -2 binary64)))))) #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))))
(exp.f64 (.f64 #s(literal 1/2 binary64) (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (sqrt.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal -1 binary64))))
(pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (sqrt.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (.f64 l l)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om (neg.f64 Om))))
(neg.f64 (/.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om) (neg.f64 Om)))
(neg.f64 (/.f64 (.f64 (.f64 l l) #s(literal -4 binary64)) (*.f64 Om Om)))
(neg.f64 (/.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om)) Om))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (*.f64 Om Om))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64)))
(/.f64 (/.f64 l (*.f64 Om #s(literal 1/4 binary64))) (/.f64 Om l))
(/.f64 (.f64 l l) (.f64 Om (*.f64 Om #s(literal 1/4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l)))))
(/.f64 (.f64 (.f64 l l) #s(literal -4 binary64)) (*.f64 Om (neg.f64 Om)))
(/.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om)) (neg.f64 Om))
(/.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om) Om)
(/.f64 (.f64 #s(literal 1 binary64) (.f64 l l)) (.f64 Om (.f64 Om #s(literal 1/4 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 l l)) (.f64 (.f64 Om #s(literal 1/4 binary64)) Om))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) l) #s(literal 1 binary64)) (*.f64 Om (/.f64 Om l)))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal -4 binary64))) (neg.f64 (*.f64 Om (neg.f64 Om))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) #s(literal 1 binary64)) (.f64 Om Om))
(/.f64 (.f64 (.f64 l l) #s(literal 1 binary64)) (.f64 Om (.f64 Om #s(literal 1/4 binary64))))
(/.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 binary64)) Om)
(/.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 l l) Om)) (*.f64 Om #s(literal 1/4 binary64)))
(/.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 l l) Om)) (neg.f64 Om))
(pow.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 Om Om) (.f64 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (*.f64 Om Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (*.f64 l l) Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (.f64 l l)))
(.f64 l (/.f64 (.f64 #s(literal 4 binary64) l) (*.f64 Om Om)))
(.f64 l (.f64 (/.f64 #s(literal 4 binary64) Om) (/.f64 l Om)))
(.f64 l (.f64 (/.f64 l (*.f64 Om #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) Om)))
(.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (/.f64 #s(literal 1 binary64) (.f64 Om Om)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)))
(.f64 (/.f64 l Om) (/.f64 l (.f64 Om #s(literal 1/4 binary64))))
(.f64 (/.f64 l (.f64 Om #s(literal 1/4 binary64))) (/.f64 l Om))
(.f64 (/.f64 #s(literal 4 binary64) Om) (/.f64 (.f64 l l) Om))
(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)))
(.f64 (/.f64 #s(literal 4 binary64) (.f64 Om Om)) (*.f64 l l))
(.f64 (.f64 (.f64 l l) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om (neg.f64 Om))))
(.f64 (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om)) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(.f64 (/.f64 (.f64 l l) Om) (/.f64 #s(literal 4 binary64) Om))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (.f64 #s(literal 4 binary64) (.f64 l l)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (.f64 l l))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om))
(.f64 (/.f64 #s(literal 1 binary64) Om) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om)) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 #s(literal 4 binary64) l) (*.f64 Om Om)) l)
(.f64 (.f64 #s(literal 4 binary64) l) (.f64 l (/.f64 #s(literal 1 binary64) (.f64 Om Om))))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))
(.f64 (/.f64 (.f64 #s(literal 4 binary64) (*.f64 l l)) Om) (/.f64 #s(literal 1 binary64) Om))
(.f64 (/.f64 (.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64))
(exp.f64 (.f64 #s(literal 1/2 binary64) (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))))))
(sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (sqrt.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal -1 binary64))))
(pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (sqrt.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (fma.f64 #s(literal 16 binary64) (pow.f64 (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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)))) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))

eval500.0ms (3.4%)

Memory: -106.2MiB live, 459.4MiB allocated
Compiler: Compiled 81 477 to 4 465 computations (94.5% saved)

prune268.0ms (1.8%)

Memory

11.4MiB live, 444.7MiB allocated

Pruning

9 alts after pruning (3 fresh and 6 done)

	Pruned	Kept	Total
New	1 551	3	1 554
Fresh	0	0	0
Picked	2	2	4
Done	0	4	4
Total	1 553	9	1 562

Accuracy

100.0%

Counts

1 562 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	77.2%	(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (.f64 Om Om))) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
✓	91.8%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
	73.1%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
✓	79.0%	(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 Om Om)) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
	46.7%	(sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (sqrt.f64 (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/4 binary64) #s(literal 1/2 binary64))))
	46.5%	(sqrt.f64 #s(approx (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2) (fma.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) #s(approx (+ (cos ( kx -2)) (cos (* ky -2))) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
✓	36.1%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin kx) 2) (* Om Om))) 1)))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))))
✓	59.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
✓	58.0%	#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Compiler

Compiled 781 to 319 computations (59.2% saved)

regimes142.0ms (1%)

Memory

33.9MiB live, 269.6MiB allocated

Counts

23 → 1

Calls

Call 1

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

Outputs

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

Calls

19 calls:

10.0ms	kx
10.0ms	(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
9.0ms	(sin.f64 kx)
9.0ms	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
8.0ms	(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))

Results

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

Compiler

Compiled 275 to 198 computations (28% saved)

regimes147.0ms (1%)

Memory

-0.0MiB live, 239.2MiB allocated

Counts

21 → 2

Calls

Call 1

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

Outputs

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

(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64)))))))

Calls

19 calls:

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

Results

Accuracy	Segments	Branch
95.2%	2	`l`
98.5%	4	`Om`
92.8%	1	`kx`
100.0%	2	`ky`
99.8%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
99.8%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
99.8%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
99.8%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
99.8%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
99.8%	2	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
99.8%	2	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
100.0%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
100.0%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
95.2%	2	`(*.f64 #s(literal 2 binary64) l)`
100.0%	2	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
92.8%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
92.8%	1	`(sin.f64 kx)`
100.0%	2	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
100.0%	3	`(sin.f64 ky)`

Compiler

Compiled 275 to 198 computations (28% saved)

regimes38.0ms (0.3%)

Memory

-15.6MiB live, 61.8MiB allocated

Counts

19 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

13.0ms	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
6.0ms	(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
6.0ms	(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
6.0ms	ky
6.0ms	(/.f64 (*.f64 #s(literal 2 binary64) l) Om)

Results

Accuracy	Segments	Branch
99.9%	2	`ky`
99.9%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
99.9%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
99.9%	2	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
99.9%	2	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`

Compiler

Compiled 46 to 36 computations (21.7% saved)

regimes44.0ms (0.3%)

Memory

13.8MiB live, 92.9MiB allocated

Counts

8 → 2

Calls

Call 1

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

Outputs

#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

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

Calls

13 calls:

6.0ms	(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
4.0ms	(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
3.0ms	(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
3.0ms	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
3.0ms	(sin.f64 ky)

Results

Accuracy	Segments	Branch
90.1%	3	`(sin.f64 ky)`
98.1%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
98.1%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
98.1%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
98.1%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
98.1%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
98.1%	2	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
98.1%	2	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
90.4%	2	`ky`
98.1%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
98.1%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
90.1%	2	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
90.1%	2	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`

Compiler

Compiled 239 to 168 computations (29.7% saved)

regimes21.0ms (0.1%)

Memory

8.3MiB live, 46.1MiB allocated

Counts

4 → 2

Calls

Call 1

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

Outputs

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

#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Calls

9 calls:

4.0ms	(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
2.0ms	(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
2.0ms	(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
2.0ms	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
2.0ms	(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))

Results

Accuracy	Segments	Branch
98.1%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
98.1%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
98.1%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
98.1%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
97.7%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
97.7%	2	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
97.7%	2	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
97.7%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
97.7%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`

Compiler

Compiled 207 to 142 computations (31.4% saved)

regimes11.0ms (0.1%)

Memory

-20.5MiB live, 16.0MiB allocated

Counts

3 → 2

Calls

Call 1

Inputs

#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

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

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

Outputs

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

#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Calls

4 calls:

5.0ms	(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
2.0ms	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
2.0ms	(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
2.0ms	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))

Results

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

Compiler

Compiled 119 to 80 computations (32.8% saved)

regimes39.0ms (0.3%)

Memory

-27.0MiB live, 70.4MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Outputs
#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Calls

19 calls:

12.0ms	(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
3.0ms	(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
1.0ms	(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
1.0ms	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
1.0ms	Om

Results

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

Compiler

Compiled 275 to 198 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.067312722206368e-17	3.6523213422783714e-16

Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.067312722206368e-17	3.6523213422783714e-16

Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.029296940545843475	0.032780354450875376

Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory

0.3MiB live, 0.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9999933419065639	1.0

Compiler

Compiled 36 to 31 computations (13.9% saved)

bsearch11.0ms (0.1%)

Memory

13.9MiB live, 13.9MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
10.0ms	0.059285350104299306	0.9995893437446464

Samples

6.0ms

112×

valid

Compiler

Compiled 141 to 122 computations (13.5% saved)

Precisions

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

simplify10.0ms (0.1%)

Memory

19.4MiB live, 19.4MiB allocated

Algorithm

1×	egg-herbie

Rules

26×	`*-commutative_binary64`
20×	`+-commutative_binary64`
2×	`1-exp_binary64`
2×	`1-exp_binary32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	126	558
1	152	558

Stop Event

1×

saturated

Calls

Call 1

Inputs
(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
(if (<=.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64))))))))
(if (<=.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(if (<=.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 1080863910568919/36028797018963968 binary64)) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))))
(if (<=.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 2251784820991689/2251799813685248 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)))
(if (<=.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 8286623314361713/18014398509481984 binary64)) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)))
#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

Outputs
(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
(if (<=.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) (+.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)))))) #s(literal 1 binary64))))))))
(if (<=.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(if (<=.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky)))) #s(literal 1 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 l (.f64 l (/.f64 #s(literal 4 binary64) Om))) Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 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))) #s(literal 1 binary64)))))))
(if (<=.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 1080863910568919/36028797018963968 binary64)) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) (.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 ( -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))) #s(literal 1 binary64))))))))
(if (<=.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 2251784820991689/2251799813685248 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 (.f64 l (/.f64 #s(literal 4 binary64) Om)) l) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)))
(if (<=.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 2251784820991689/2251799813685248 binary64)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (.f64 l (.f64 l (/.f64 #s(literal 4 binary64) Om))) Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (.f64 ky ky))) #s(literal 1 binary64)))))) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ ( (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)))
(if (<=.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #s(literal 8286623314361713/18014398509481984 binary64)) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64)))
#s(approx (sqrt (+ (/ 1/2 (sqrt (+ (* (/ (* 4 (* l l)) (* Om Om)) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) 1))) 1/2)) #s(literal 1 binary64))

soundness1.1s (7.5%)

Memory

5.8MiB live, 1 185.4MiB allocated

Rules

11 696×	`lower-fma.f64`
11 696×	`lower-fma.f32`
9 754×	`lower-*.f64`
9 754×	`lower-*.f32`
9 134×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	96	749
0	144	753
1	593	676
2	5467	676
0	8763	638
0	582	10419
1	1932	10186
2	7931	10184
0	8041	9659
0	1703	49453
1	5724	48127
0	8705	44780
0	1485	58512
1	4920	58089
0	9541	53789
0	1650	38730
1	5596	37731
0	8605	35649
0	21	116
0	37	116
1	129	113
2	924	113
0	8513	109

Stop Event

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

Compiler

Compiled 631 to 314 computations (50.2% saved)

preprocess130.0ms (0.9%)

Memory

-21.0MiB live, 259.2MiB allocated

Remove

(abs l)

(abs Om)

Compiler

Compiled 3 024 to 1 522 computations (49.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze156.0ms (1.1%)

sample2.5s (17%)

explain369.0ms (2.5%)

preprocess277.0ms (1.9%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify156.0ms (1.1%)

localize82.0ms (0.6%)

series72.0ms (0.5%)

simplify346.0ms (2.4%)

rewrite388.0ms (2.7%)

eval154.0ms (1.1%)

prune146.0ms (1%)

simplify493.0ms (3.4%)

localize525.0ms (3.6%)

series363.0ms (2.5%)

simplify661.0ms (4.5%)

rewrite300.0ms (2.1%)

eval381.0ms (2.6%)

prune311.0ms (2.1%)

simplify278.0ms (1.9%)

localize488.0ms (3.3%)

series168.0ms (1.1%)

simplify467.0ms (3.2%)

rewrite291.0ms (2%)

eval215.0ms (1.5%)

prune248.0ms (1.7%)

simplify435.0ms (3%)

localize559.0ms (3.8%)

series330.0ms (2.3%)

simplify719.0ms (4.9%)

rewrite275.0ms (1.9%)

eval500.0ms (3.4%)

prune268.0ms (1.8%)

regimes142.0ms (1%)

regimes147.0ms (1%)

regimes38.0ms (0.3%)

regimes44.0ms (0.3%)

regimes21.0ms (0.1%)

regimes11.0ms (0.1%)

regimes39.0ms (0.3%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch11.0ms (0.1%)

simplify10.0ms (0.1%)

soundness1.1s (7.5%)

preprocess130.0ms (0.9%)

end0.0ms (0%)

Profiling