Toniolo and Linder, Equation (3a)

Time bar (total: 13.7s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze141.0ms (1%)

Memory
18.0MiB live, 211.8MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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.0s (14.8%)

Memory
86.0MiB live, 2 648.7MiB allocated
Samples
1.6s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.4s
ival-sin: 392.0ms (28.8% of total)
ival-pow2: 265.0ms (19.4% of total)
ival-mult: 205.0ms (15% of total)
ival-div: 187.0ms (13.7% of total)
ival-add: 187.0ms (13.7% of total)
ival-sqrt: 111.0ms (8.1% of total)
exact: 7.0ms (0.5% of total)
ival-true: 6.0ms (0.4% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain577.0ms (4.2%)

Memory
-47.1MiB live, 691.3MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
260-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))))))
120-1(-1.1793587407623702e-240 -1.5182022202511229e-274 2.804285992115508e-162 4.4374673828344774e-184)(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
20-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)))))))
00-0-(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
00-0-Om
00-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))))))))))
00-0-#s(literal 1 binary64)
00-0-(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
00-0-(*.f64 #s(literal 2 binary64) l)
00-0-(sin.f64 ky)
00-0-(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
00-0-kx
00-0-ky
00-0-(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
00-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)))))))))
00-0-(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
00-0-(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
00-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)))))
00-0-(sin.f64 kx)
00-0-#s(literal 2 binary64)
00-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))))))))
00-0-l
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
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-rescue260
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))overflow28
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)overflow30
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))overflow54
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))overflow54
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))overflow62
*.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))))n*o70
Confusion
Predicted +Predicted -
+12
-32221
Precision
0.030303030303030304
Recall
0.3333333333333333
Confusion?
Predicted +Predicted MaybePredicted -
+102
-320221
Precision?
0.030303030303030304
Recall?
0.3333333333333333
Freqs
test
numberfreq
0223
133
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
242.0ms512×0valid
Compiler

Compiled 445 to 70 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 215.0ms
ival-sqrt: 117.0ms (54.3% of total)
ival-sin: 56.0ms (26% of total)
ival-pow2: 16.0ms (7.4% of total)
ival-div: 10.0ms (4.6% of total)
ival-mult: 8.0ms (3.7% of total)
ival-add: 6.0ms (2.8% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess202.0ms (1.5%)

Memory
30.2MiB live, 226.7MiB allocated
Algorithm
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)

IterNodesCost
0127391
1330354
2871354
33861354
47924354
02227
03927
16425
212425
344025
4173425
5303925
6356325
7380025
8430825
9567225
10666425
01009024
Stop Event
iter limit
node limit
iter limit
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.4MiB live, 0.4MiB allocated
Compiler

Compiled 4 to 4 computations (0% saved)

prune1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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)

simplify163.0ms (1.2%)

Memory
-2.3MiB live, 155.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff128
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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-diff320
(*.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-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(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)

IterNodesCost
022198
039198
164194
2124194
3440194
41734194
53039194
63563194
73800194
84308194
95672194
106664194
010090188
Stop Event
iter limit
node limit
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

localize79.0ms (0.6%)

Memory
-2.9MiB live, 115.2MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.21875
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
accuracy0.3991012695368841
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy2.852042627308372
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
accuracy6.031498113148435
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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
56.0ms256×0valid
Compiler

Compiled 206 to 24 computations (88.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-sin: 19.0ms (44.5% of total)
ival-pow2: 8.0ms (18.7% of total)
ival-div: 5.0ms (11.7% of total)
ival-mult: 4.0ms (9.4% of total)
ival-add: 3.0ms (7% of total)
ival-sqrt: 3.0ms (7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series63.0ms (0.5%)

Memory
10.1MiB live, 85.6MiB allocated
Counts
7 → 228
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 (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 (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

57 calls:

TimeVariablePointExpression
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))))))))
4.0ms
ky
@0
(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))))))))

simplify341.0ms (2.5%)

Memory
-6.2MiB live, 361.2MiB allocated
Algorithm
egg-herbie
Rules
10 180×lower-fma.f64
10 180×lower-fma.f32
8 144×lower-*.f64
8 144×lower-*.f32
2 768×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04747346
115547187
265216855
080346493
Stop Event
iter limit
node limit
Counts
228 → 228
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)))
(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))))
(fma.f64 (*.f64 l l) (/.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))) (* -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)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #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) (fma.f64 (*.f64 l l) (fma.f64 (fma.f64 #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 (/.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 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 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 l l) #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 (*.f64 Om Om) (*.f64 Om Om))) #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/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 #s(literal 1/4 binary64) (/.f64 Om l)) #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 (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/32 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 l (*.f64 l 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 #s(literal 1/4 binary64) (/.f64 Om l)) #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 (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/32 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 l (*.f64 l 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 #s(literal 1/4 binary64) (/.f64 Om l)) #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 #s(literal -1/4 binary64) Om) l) #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 (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/32 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 l l)) (*.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/4 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 #s(literal -1/32 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 l l)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.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 (*.f64 (*.f64 l l) (*.f64 l l)))))) 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 #s(literal 1/4 binary64) (/.f64 Om l)) #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 (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/32 binary64) (*.f64 l (*.f64 l l)))) (*.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 #s(literal 1/4 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 (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/32 binary64) (*.f64 l (*.f64 l 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 5 binary64)))) (/.f64 (*.f64 #s(literal 3/512 binary64) (*.f64 Om Om)) (pow.f64 l #s(literal 5 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 #s(literal 1/4 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 (*.f64 l l) (/.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 (+ (* -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 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -12 binary64))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 (*.f64 l l) (/.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 (+ (* -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)) (*.f64 (*.f64 l l) (*.f64 l l))) (/.f64 #s(literal -12 binary64) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (/.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 (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 (*.f64 (*.f64 l l) (*.f64 l l)) #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 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))))) (pow.f64 Om #s(literal 6 binary64)))) (fma.f64 (*.f64 l l) (/.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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.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 (+ (* -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 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -12 binary64))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 (*.f64 l l) (/.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 (+ (* -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)) (*.f64 (*.f64 l l) (*.f64 l l))) (/.f64 #s(literal -12 binary64) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (/.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 (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 (*.f64 (*.f64 l l) (*.f64 l l)) #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 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))))) (pow.f64 Om #s(literal 6 binary64)))) (fma.f64 (*.f64 l l) (/.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/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 #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 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)))))))))
(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 l (*.f64 l (*.f64 kx kx))) (*.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 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))))) (* -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 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 3 binary64)))) #s(literal -12 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 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 kx kx) (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 (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 (neg.f64 l) (/.f64 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 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) (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))) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 l l) (*.f64 (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 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 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)))) #s(literal -4 binary64)) (fma.f64 (/.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)))) #s(literal 8/45 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 3 binary64)))) #s(literal -12 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 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 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 16/3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 3 binary64))))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 3 binary64)))) #s(literal -12 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 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)))) (*.f64 (neg.f64 l) (/.f64 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 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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 l (*.f64 l (*.f64 ky ky))) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 ky ky)) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -12 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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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) (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 ky ky)) (*.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 l l) (*.f64 (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal -4 binary64)) (fma.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 2 binary64) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -12 binary64))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 8/45 binary64)) (*.f64 (*.f64 Om Om) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -12 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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 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)) #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) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (fma.f64 (/.f64 (*.f64 l (*.f64 l (*.f64 kx kx))) (*.f64 Om Om)) (fma.f64 #s(literal -4/3 binary64) (*.f64 kx kx) #s(literal 4 binary64)) #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)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 kx kx) (*.f64 (/.f64 (*.f64 l (*.f64 l (*.f64 kx kx))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (*.f64 kx kx) #s(literal -4/3 binary64)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #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 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (fma.f64 (*.f64 ky ky) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal -4/3 binary64) (*.f64 ky ky) #s(literal 4 binary64))) #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)))))))))
(+.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (*.f64 ky ky) #s(literal -4/3 binary64))) (*.f64 (*.f64 ky ky) (*.f64 ky ky))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 2 binary64) (*.f64 l l)) #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)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.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)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (+.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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 l #s(literal 2 binary64))) Om)
(* 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 #s(literal 1/4 binary64)) (*.f64 l l)) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 2 binary64) Om))))
(* 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 #s(literal -1/64 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 (*.f64 l l) (*.f64 l 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 #s(literal 1/4 binary64)) (*.f64 l l)) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 2 binary64) Om)))))
(* 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 #s(literal -1/64 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 (*.f64 l l) (*.f64 l 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 5 binary64)))) (/.f64 (*.f64 #s(literal 1/512 binary64) (pow.f64 Om #s(literal 5 binary64))) (pow.f64 l #s(literal 6 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 #s(literal 1/4 binary64)) (*.f64 l l)) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 2 binary64) Om))))))
(* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 (*.f64 #s(literal -2 binary64) l) Om))
(* -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 #s(literal 1/4 binary64)) (*.f64 l l)) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 2 binary64) Om))) (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)))))))))
(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 #s(literal -1/64 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 (*.f64 l l) (*.f64 l 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 #s(literal 1/4 binary64)) (*.f64 l l)) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 2 binary64) Om))))))
(* -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))))))))))
(*.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 #s(literal -1/64 binary64) (*.f64 Om (*.f64 Om Om))) (*.f64 (*.f64 l l) (*.f64 l 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 5 binary64)))) (/.f64 (*.f64 #s(literal 1/512 binary64) (pow.f64 Om #s(literal 5 binary64))) (pow.f64 l #s(literal 6 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 #s(literal 1/4 binary64)) (*.f64 l l)) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 2 binary64) Om))))) (neg.f64 l))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/.f64 (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 l #s(literal 2 binary64))) Om)
(/ (+ (* 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 #s(literal 1/4 binary64) (*.f64 Om Om)) l) (*.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 (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/64 binary64) (*.f64 l (*.f64 l l)))) (*.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 #s(literal 1/4 binary64) l))))) 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 l (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (*.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 #s(literal 1/512 binary64) (*.f64 Om Om)) (pow.f64 l #s(literal 5 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 #s(literal -1/64 binary64) (*.f64 l (*.f64 l l))))) (*.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 #s(literal 1/4 binary64) l))))) 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 2 binary64) (*.f64 l l)) #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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 Om Om))) (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)) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 Om Om) (*.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))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(+.f64 (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)))) (/.f64 (*.f64 #s(literal 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 Om Om))) (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)) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 Om Om) (*.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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 2 binary64) (*.f64 l l)) #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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 Om Om))) (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)) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 Om Om) (*.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))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(+.f64 (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)))) (/.f64 (*.f64 #s(literal 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 Om Om))) (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)) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(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)))
(+ (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 #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 2 binary64) (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (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))))
(+ (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 (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 kx kx)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 kx kx) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 Om Om))) (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))))
(+ (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 #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 kx kx) (*.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 kx (*.f64 kx (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (-.f64 #s(literal 8/45 binary64) (*.f64 (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.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 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 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.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))))))))) (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))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l (*.f64 l (*.f64 ky ky)))) (*.f64 Om Om)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (*.f64 ky ky)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))) (*.f64 ky (*.f64 ky (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))) (fma.f64 (*.f64 ky ky) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (-.f64 #s(literal 8/45 binary64) (*.f64 (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #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 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.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) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(+ (* 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 (*.f64 l (*.f64 l (*.f64 kx kx))) (*.f64 Om Om)) (fma.f64 #s(literal -4/3 binary64) (*.f64 kx kx) #s(literal 4 binary64))))
(+ (* 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 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (*.f64 kx kx) (*.f64 (/.f64 (*.f64 l (*.f64 l (*.f64 kx kx))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (*.f64 kx kx) #s(literal -4/3 binary64)))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 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 ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(+ (* 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 (/.f64 (*.f64 l (*.f64 l (*.f64 ky ky))) (*.f64 Om Om)) (fma.f64 #s(literal -4/3 binary64) (*.f64 ky ky) #s(literal 4 binary64))))
(+ (* 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 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (*.f64 ky ky) #s(literal -4/3 binary64))) (*.f64 (*.f64 ky ky) (*.f64 ky ky))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.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 ky (fma.f64 ky (*.f64 (*.f64 ky ky) #s(literal -1/3 binary64)) ky))
(* (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 ky (*.f64 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 ky (*.f64 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))

rewrite338.0ms (2.5%)

Memory
-4.9MiB live, 466.9MiB 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)

IterNodesCost
02194
03794
112992
292492
0851389
Stop Event
iter limit
node limit
iter limit
Counts
7 → 621
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))))
(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)))
(+.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)))

eval148.0ms (1.1%)

Memory
37.5MiB live, 336.3MiB allocated
Compiler

Compiled 42 163 to 5 093 computations (87.9% saved)

prune148.0ms (1.1%)

Memory
8.9MiB live, 331.6MiB allocated
Pruning

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New8418849
Fresh000
Picked101
Done000
Total8428850
Accuracy
100.0%
Counts
850 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.6%
(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)))
48.4%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))))
92.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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 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)))))))
70.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))))
83.5%
(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 #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 1/2 binary64))))
70.1%
(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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
65.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)))
54.2%
(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 508 to 316 computations (37.8% saved)

simplify254.0ms (1.9%)

Memory
11.6MiB live, 359.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff128
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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))))))))
cost-diff384
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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-diff704
(/.f64 #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)))) (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))))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff0
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))
cost-diff0
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))))
cost-diff320
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff0
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
cost-diff0
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
cost-diff0
#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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
cost-diff0
(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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
cost-diff0
#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-diff0
(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-diff320
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(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-diff384
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 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-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
Rules
7 392×lower-*.f32
7 368×lower-*.f64
6 974×lower-fma.f32
6 968×lower-fma.f64
1 354×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0761456
01331456
12381333
26501277
342141277
081221216
Stop Event
iter limit
node limit
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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
#s(literal 4 binary64)
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(/.f64 (*.f64 l l) (*.f64 Om Om))
(*.f64 l l)
l
(*.f64 Om Om)
Om
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
#s(literal 4 binary64)
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
(/.f64 (*.f64 l l) (*.f64 Om Om))
(*.f64 l l)
l
(*.f64 Om Om)
Om
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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 #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) (/.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 #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)))) (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 #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)))))
(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) (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
(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 #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 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #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)))))
(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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l (*.f64 l #s(literal 4 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 (pow.f64 (sin.f64 kx) #s(literal 2 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)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
#s(literal 4 binary64)
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(/.f64 (*.f64 l l) (*.f64 Om Om))
(*.f64 l l)
l
(*.f64 Om Om)
Om
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
(sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
#s(literal 4 binary64)
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
(/.f64 (*.f64 l l) (*.f64 Om Om))
(*.f64 l l)
l
(*.f64 Om Om)
Om
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (*.f64 l l) #s(literal -4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (sqrt.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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (*.f64 l l) #s(literal -4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (sqrt.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) #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) (/.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 #s(literal 1 binary64) (/.f64 (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 (*.f64 l l) #s(literal -4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (sqrt.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))))))
(/.f64 #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)))) (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 (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))) (sqrt.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)))))
(/.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 (-.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)))) (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 (*.f64 l l) #s(literal -4 binary64)) (*.f64 Om Om)) #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) (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 #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
(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 (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))

localize453.0ms (3.3%)

Memory
-50.5MiB live, 567.8MiB allocated
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy0.8774110446182575
(*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 4 binary64) (*.f64 l l)))
accuracy5.734080378315779
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy7.297945833821709
(/.f64 (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 Om Om))
accuracy8.389243110221985
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
accuracy0.08203125
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy0.21601189285937372
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
accuracy0.2496342968390825
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
accuracy8.069969971194492
(/.f64 (*.f64 l l) (*.f64 Om Om))
accuracy0.08203125
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy0.2081989854738095
#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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
accuracy0.2496342968390825
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
accuracy8.069969971194492
(/.f64 (*.f64 l l) (*.f64 Om Om))
accuracy0
(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)))
accuracy29.453124831717187
#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))
accuracy0.04296875
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
accuracy0.5753038207939921
(*.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))
accuracy5.734080378315779
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy8.389243110221985
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
Samples
98.0ms52×1valid
88.0ms55×2valid
50.0ms90×0invalid
27.0ms19×1invalid
21.0ms38×0valid
1.0ms1exit
Compiler

Compiled 1 352 to 69 computations (94.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 193.0ms
ival-mult: 42.0ms (21.8% of total)
ival-cos: 38.0ms (19.7% of total)
ival-div: 22.0ms (11.4% of total)
adjust: 20.0ms (10.4% of total)
ival-add: 20.0ms (10.4% of total)
ival-sqrt: 19.0ms (9.8% of total)
ival-sin: 14.0ms (7.3% of total)
ival-pow2: 13.0ms (6.7% of total)
ival-sub: 4.0ms (2.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series344.0ms (2.5%)

Memory
11.9MiB live, 267.1MiB allocated
Counts
24 → 900
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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (/.f64 #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)))) (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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 (*.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())
#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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) (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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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) (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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 (+ (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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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) (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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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) (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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (taylor 0 kx) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<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)))) (- 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 (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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (/.f64 #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)))) (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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (/.f64 #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)))) (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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (/.f64 #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)))) (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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<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) (/.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)))))) (patch (/.f64 #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)))) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (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/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))))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (* (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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (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/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))))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (* (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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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) (/.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)))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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)))))))) #<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 (/ (* 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 (/ (pow l 2) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 l l) (*.f64 Om Om)) (patch (/.f64 (*.f64 l l) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (taylor 0 kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2)))) (taylor 0 kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2)))) (taylor 0 kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/315 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2)))) (taylor 0 kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf kx) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)) (taylor -inf Om) (#s(alt (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (patch (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 ky) (#s(alt #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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

225 calls:

TimeVariablePointExpression
47.0ms
kx
@inf
(/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om))))))
23.0ms
kx
@inf
(+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2)
18.0ms
l
@inf
(/ (* l l) (* Om Om))
8.0ms
kx
@-inf
(+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1)
7.0ms
kx
@0
(/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om))))))

simplify701.0ms (5.1%)

Memory
20.5MiB live, 642.8MiB allocated
Algorithm
egg-herbie
Rules
7 520×lower-*.f64
7 520×lower-*.f32
7 110×lower-fma.f64
7 110×lower-fma.f32
4 756×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0157850680
1542549288
0820246938
Stop Event
iter limit
node limit
Counts
900 → 900
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 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
(+ 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/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 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
(+ 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/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))))))
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)))))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 2 (* (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)))))))))
(+ 2 (* (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
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+ 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 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
1
(+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1 (* -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 (* (/ (+ (* -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/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(+ 1 (* 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)))))))))
(+ 1 (* 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))))))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 2 (+ (* -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)))))
(+ 2 (+ (* -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))))))
2
(+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 2 (+ (* -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)))))
(+ 2 (+ (* -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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
(+ 1 (+ (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)))))))
(+ 1 (+ (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)))))))))))
(+ 1 (+ (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)))))))))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
(+ 1 (+ (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)))))))
(+ 1 (+ (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)))))))))))
(+ 1 (+ (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)))))))))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(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))))))
(+ (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)))))))))
(+ (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)))))))))))
(+ (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)))))))))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(+ (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)))))))))
(+ (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)))))))))))
(+ (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)))))))))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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
(+ 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/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/4 (* (* (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/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/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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/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))))))))
(+ (* 1/4 (* (* (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/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)))))))))
(+ (* 1/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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
(+ 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))))))
(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)))))
(/ (* 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)
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (pow l 2) (pow Om 2))
(/ (* (pow kx 2) (pow l 2)) (pow Om 2))
(* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))
(* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))
(* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/315 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/ (* (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)
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))))
(* 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 kx kx) (/.f64 (*.f64 l l) (*.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 #s(literal -4/3 binary64) (*.f64 kx kx)) (*.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 #s(literal 1 binary64) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.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 ky ky) (/.f64 (*.f64 l l) (*.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 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 8/45 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))))) (/.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))))
(+ 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 #s(literal 1/2 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)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 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 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/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 (*.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/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 (*.f64 Om (*.f64 Om Om)) (*.f64 l l))) (*.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 #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 (*.f64 Om (*.f64 Om Om)) (*.f64 l l))) (*.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))))))))
(+.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) (fma.f64 #s(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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (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) (fma.f64 #s(literal -1/2 binary64) (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 kx kx) (/.f64 (*.f64 l l) (*.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) (fma.f64 #s(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 (+ 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 (*.f64 l l) (neg.f64 (*.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) (fma.f64 #s(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 (+ 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)))))) (+.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) (fma.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(literal -1/2 binary64) (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 ky ky) (/.f64 (*.f64 l l) (*.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) (fma.f64 #s(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 (+ 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 (*.f64 l l) (neg.f64 (*.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) (fma.f64 #s(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 (+ 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 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) (fma.f64 #s(literal -1/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)))))) (+.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) (fma.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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 (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) (*.f64 #s(literal 1/2 binary64) (sqrt.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 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 (*.f64 l l) (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) (-.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 #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)))))) (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 #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))))))))))
(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 #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)))))) (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 #s(literal 1/32 binary64) (/.f64 (*.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))))) (*.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))))))) 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 #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)))))) (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 (*.f64 l l) (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 (*.f64 l l) (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 l l) (*.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 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 (*.f64 l l) (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 (*.f64 l l) (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 (*.f64 l l) (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 l l) (*.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 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 (*.f64 l l) (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 kx kx) (*.f64 (*.f64 l l) (/.f64 (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 l l) (/.f64 (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 (*.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 -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 l l) (/.f64 (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 ky ky) (*.f64 (*.f64 l l) (/.f64 (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 (*.f64 #s(literal 1/2 binary64) (*.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 l l) (/.f64 (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 (*.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) (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 l l) (/.f64 (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 #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 (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 kx kx) (/.f64 (*.f64 l l) (*.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 (*.f64 l l) (neg.f64 (*.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 (*.f64 l l) (neg.f64 (*.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 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) (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 (*.f64 l l) (neg.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) (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 (*.f64 l l) (neg.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) (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 (*.f64 l l) (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) (-.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 #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)))))) (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 #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))))))))))
(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 #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)))))) (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 #s(literal 1/32 binary64) (/.f64 (*.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))))) (*.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))))))) 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 #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)))))) (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 (*.f64 l l) (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 (*.f64 l l) (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 l l) (*.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 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 (*.f64 l l) (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 (*.f64 l l) (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 (*.f64 l l) (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 l l) (*.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 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 (*.f64 l l) (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 kx kx) (*.f64 (*.f64 l l) (/.f64 (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 l l) (/.f64 (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 (*.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 -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 l l) (/.f64 (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 ky ky) (*.f64 (*.f64 l l) (/.f64 (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 (*.f64 #s(literal 1/2 binary64) (*.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 l l) (/.f64 (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 (*.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) (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 l l) (/.f64 (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 #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 (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 kx kx) (/.f64 (*.f64 l l) (*.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 (*.f64 l l) (neg.f64 (*.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 (*.f64 l l) (neg.f64 (*.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 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) (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 (*.f64 l l) (neg.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) (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 (*.f64 l l) (neg.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) (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 kx 2) (pow l 2)) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(+ 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 (*.f64 l l) (neg.f64 (*.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) (fma.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) (neg.f64 (*.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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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) (-.f64 (*.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))))) (/.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 #s(literal 1/2 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 (+ (* -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/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 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (neg.f64 (*.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 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (*.f64 #s(literal -1/4 binary64) (+.f64 (/.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))) (/.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))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (neg.f64 (*.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 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (*.f64 #s(literal -1/4 binary64) (+.f64 (/.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))) (/.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))))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.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
#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 (neg.f64 (sin.f64 kx)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (sin.f64 kx) #s(literal 8 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 #s(literal -1/2 binary64) (/.f64 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 (neg.f64 (sin.f64 kx)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (sin.f64 kx) #s(literal 8 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/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 (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 (*.f64 #s(literal -1/2 binary64) (*.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))))
(+ 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 (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))) (/.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))))))
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 (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 (*.f64 #s(literal -1/2 binary64) (*.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))))
(+ 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 (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))) (/.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))))))
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 (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 kx kx) (/.f64 (*.f64 l l) (*.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 (*.f64 l l) (neg.f64 (*.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 (*.f64 l l) (neg.f64 (*.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 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) (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 (*.f64 l l) (neg.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) (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 (*.f64 l l) (neg.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) (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 (*.f64 l l) (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) (-.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 #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)))))) (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 #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))))))))))
(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 #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)))))) (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 #s(literal 1/32 binary64) (/.f64 (*.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))))) (*.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))))))) 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 #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)))))) (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 (*.f64 l l) (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 (*.f64 l l) (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 l l) (*.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 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 (*.f64 l l) (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 (*.f64 l l) (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 (*.f64 l l) (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 l l) (*.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 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 (*.f64 l l) (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 kx kx) (*.f64 (*.f64 l l) (/.f64 (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 l l) (/.f64 (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 (*.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 -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 l l) (/.f64 (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 ky ky) (*.f64 (*.f64 l l) (/.f64 (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 (*.f64 #s(literal 1/2 binary64) (*.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 l l) (/.f64 (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 (*.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) (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 l l) (/.f64 (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)))))))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal -2 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 2 binary64))
(+ 2 (* (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 #s(literal -1/2 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)) (*.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 2 binary64))
(+ 2 (* (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) (*.f64 #s(literal -1/2 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)))) (*.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 2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 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 binary64))
(+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(+.f64 (fma.f64 (*.f64 #s(literal 1/2 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 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
(+ 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 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.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)))))) (*.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 (+.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 (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))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal -1/2 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 binary64))
(+ 1 (* -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 #s(literal 1 binary64) (/.f64 (fma.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 (+.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) 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 (* -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 #s(literal 1 binary64) (/.f64 (fma.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)) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.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 (+.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) 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
#s(literal 1 binary64)
(+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 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 binary64))
(+ 1 (* 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)))))))))
(fma.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 (*.f64 #s(literal -1/16 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 binary64))
(+ 1 (* 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))))))))))
(fma.f64 Om (fma.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 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/256 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/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))) #s(literal 1 binary64))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal -2 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 2 binary64))
(+ 2 (+ (* -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)))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 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 #s(literal -2 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))))))
(+ 2 (+ (* -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))))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 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 #s(literal -2 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))))))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 #s(literal -2 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 2 binary64))
(+ 2 (+ (* -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)))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 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 #s(literal -2 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))))))
(+ 2 (+ (* -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))))))
(+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 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 #s(literal -2 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))))))
(+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
(+.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 (+ (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)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -2 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)))) (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 (+ (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)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (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)))))))) (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 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.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 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 #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 (+ (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)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.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))) (+.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 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.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 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 #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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ 1 (+ (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)))))))
(+.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) (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) (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 (+ (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)))))))))))
(+.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) (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 (/.f64 (*.f64 #s(literal -2 binary64) (*.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) (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) (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 (+ (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)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal -1/2 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 (/.f64 (*.f64 #s(literal -2 binary64) (*.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) (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) (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
(+.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 (* 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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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)))))))
(+ (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)))))))))
(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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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))))))))
(+ (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)))))))))))
(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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64)))))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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))))))))
(+ (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)))))))))))))
(fma.f64 (*.f64 kx kx) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64))))) (+.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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64)))))) (*.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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 (*.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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64))))))))))) (*.f64 (*.f64 #s(literal 1/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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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))))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(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)))))))
(+ (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)))))))))
(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))))))))
(+ (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)))))))))))
(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))))))))
(+ (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)))))))))))))
(fma.f64 (*.f64 ky ky) (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 (-.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 (+.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 -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))))))))))) (*.f64 (*.f64 #s(literal 1/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)))))) (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 (*.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))))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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)))))))
(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))))))
(sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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
#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 (*.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) (+ (* -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 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 (*.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 #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/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 (fma.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)) (*.f64 Om (pow.f64 l #s(literal 4 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 (*.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 #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/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 (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))) (+.f64 (neg.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)) (*.f64 Om (pow.f64 l #s(literal 4 binary64))))) (neg.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)))))) (fma.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 #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/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 (*.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 #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)))))) (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 (fma.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)) (*.f64 Om (pow.f64 l #s(literal 4 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 (*.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 #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))))))) (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 (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))) (+.f64 (neg.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)) (*.f64 Om (pow.f64 l #s(literal 4 binary64))))) (neg.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)))))) (fma.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 #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))))))) (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 #s(literal 3/256 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/2048 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 (/.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 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 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 #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 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 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 #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))))))
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 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 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 #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 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 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 #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))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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)))))))))
(+ (* 1/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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))))))))))
(+ (* 1/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64)))))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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))))))))))
(+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64))))) (+.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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64)))))) (*.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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 (*.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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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))) (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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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)))))) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 binary64))))))))))) (*.f64 (*.f64 #s(literal 1/4 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal -4 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om 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))))))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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/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/4 (* (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/4 (* (* (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 (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 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)))))))))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 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/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 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 (+.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 -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))))))))))) (*.f64 (*.f64 #s(literal 1/4 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)))))) (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/2 binary64) (*.f64 #s(literal 1/2 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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 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))) (*.f64 Om Om)) #s(literal -4 binary64))) (+.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
#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 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/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 (*.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/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 (*.f64 Om (*.f64 Om Om)) (*.f64 l l))) (*.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 #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 (*.f64 Om (*.f64 Om Om)) (*.f64 l l))) (*.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)))))
(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))
(/ (* 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 -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 (*.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)
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (pow l 2) (pow Om 2))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/ (* (pow kx 2) (pow l 2)) (pow Om 2))
(*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 kx kx) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/315 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -1/315 binary64) (/.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 l l)) (*.f64 Om Om))) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))
(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))
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 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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.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 (*.f64 l l) (*.f64 #s(literal 4 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))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 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))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 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))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.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 (*.f64 l l) (*.f64 #s(literal 4 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))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 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))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 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))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.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 (*.f64 #s(literal 4 binary64) (*.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 (*.f64 #s(literal 4 binary64) (*.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 (*.f64 #s(literal 4 binary64) (*.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 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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(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 (+ (* 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 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.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 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)))))))
(+.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))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 kx kx)) (*.f64 l l)) (*.f64 Om Om))))))
(+ 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)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 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 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)))))))
(+.f64 #s(literal 1 binary64) (fma.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))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 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)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 8/45 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(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))
(* 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 kx kx) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 kx kx)) (*.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 kx kx) (/.f64 (*.f64 l l) (*.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 ky ky) (/.f64 (*.f64 l l) (*.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 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 8/45 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))))) (/.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 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 (*.f64 kx kx) (*.f64 (*.f64 l l) (fma.f64 #s(literal 8/45 binary64) (*.f64 kx kx) #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 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 #s(literal 4 binary64) (*.f64 (*.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)))

rewrite261.0ms (1.9%)

Memory
22.5MiB live, 486.3MiB allocated
Rules
3 390×lower-*.f32
3 370×lower-*.f64
2 616×lower-pow.f32
2 612×lower-pow.f64
2 508×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
074678
0129643
1510538
24629528
08860498
Stop Event
iter limit
node limit
iter limit
Counts
24 → 505
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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))
(/.f64 #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)))) (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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #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)))) (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 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 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) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 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 l) (*.f64 Om Om))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (/.f64 l Om) #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))))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (/.f64 l Om) #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)))) #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 Om) #s(literal 4 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 (/.f64 l Om) #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)))) #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 Om) #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 (/.f64 l Om) #s(literal 4 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)))) #s(literal 1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (*.f64 (/.f64 l Om) #s(literal 4 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 (/.f64 l Om) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l 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))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l 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))) (*.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 #s(literal 4 binary64) (*.f64 l l))) (/.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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.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))) Om) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #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 (/.f64 l (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #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 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 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l)))) (/.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om 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 #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 binary64))
(fma.f64 (exp.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))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (exp.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 #s(literal 4 binary64) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (exp.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))) Om))) (exp.f64 (log.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om))) #s(literal 1 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 6 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 4 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 4 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal -1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #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 (fma.f64 #s(literal -1/2 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) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 3 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64))))) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 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))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (+.f64 #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 (fma.f64 #s(literal -1/2 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) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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))
(pow.f64 (exp.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))
(*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))) #s(literal 1/4 binary64))
(pow.f64 (exp.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 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)))))))) (+.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64)))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64))) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))))
(*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))) (/.f64 (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))) #s(literal 1 binary64))
(fma.f64 (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1/4 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64))) (+.f64 (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64)))) (neg.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))))
(/.f64 (-.f64 (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(pow.f64 (/.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))))))
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log1p.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))))
(exp.f64 (*.f64 (log1p.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)))) #s(literal -1/2 binary64)))
(exp.f64 (-.f64 (*.f64 (log1p.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 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))) #s(literal 1/2 binary64)) (*.f64 (log1p.f64 (neg.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(sqrt.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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))))
(neg.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 (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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64)))) (neg.f64 (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64)))) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))))
(pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1/2 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 (fma.f64 #s(literal -1/2 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) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 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))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64))))) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 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))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (+.f64 #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 (fma.f64 #s(literal -1/2 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) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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))))))
(+.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 (*.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 #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))) #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 (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)))) #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 (*.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))
(exp.f64 (*.f64 (log.f64 (/.f64 l Om)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 Om Om) (*.f64 l l))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)) (log.f64 (*.f64 Om Om))))
(neg.f64 (/.f64 (*.f64 l l) (neg.f64 (*.f64 Om Om))))
(neg.f64 (/.f64 (*.f64 l (neg.f64 l)) (*.f64 Om Om)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (*.f64 l l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 Om Om) (*.f64 l l)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (/.f64 (*.f64 l l) Om)))
(/.f64 (/.f64 l Om) (/.f64 Om l))
(/.f64 (*.f64 l l) (*.f64 Om Om))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 Om Om) (*.f64 l l))))
(/.f64 (*.f64 l (neg.f64 l)) (neg.f64 (*.f64 Om Om)))
(/.f64 (/.f64 (*.f64 l l) Om) Om)
(/.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 Om l) Om))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 l)) (*.f64 (/.f64 Om l) (neg.f64 Om)))
(/.f64 (*.f64 l #s(literal 1 binary64)) (*.f64 Om (/.f64 Om l)))
(/.f64 (*.f64 (neg.f64 l) #s(literal 1 binary64)) (*.f64 (neg.f64 Om) (/.f64 Om l)))
(/.f64 (*.f64 (neg.f64 l) (neg.f64 l)) (*.f64 (neg.f64 Om) (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 l (neg.f64 l))) (neg.f64 (neg.f64 (*.f64 Om Om))))
(/.f64 (neg.f64 (/.f64 (*.f64 l l) Om)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 l Om) l) Om)
(/.f64 (*.f64 (/.f64 l Om) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (*.f64 (/.f64 l Om) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 l l) #s(literal 1 binary64)) (*.f64 Om Om))
(/.f64 (*.f64 (neg.f64 l) (/.f64 l Om)) (neg.f64 Om))
(pow.f64 (/.f64 l Om) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 Om Om) (*.f64 l l)) #s(literal -1 binary64))
(pow.f64 (/.f64 Om l) #s(literal -2 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 Om Om) (*.f64 l l)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 Om (/.f64 (*.f64 l l) Om)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 l (/.f64 l (*.f64 Om Om))))
(*.f64 l (/.f64 l (*.f64 Om Om)))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 l Om)))
(*.f64 (/.f64 l Om) (/.f64 l Om))
(*.f64 (*.f64 l l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (*.f64 l (neg.f64 l)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 Om Om))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 l l))
(*.f64 (/.f64 (*.f64 l l) Om) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.f64 l (*.f64 Om Om)) l)
(*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 1 binary64) Om))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))))
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 Om Om) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l)) (*.f64 Om Om))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (neg.f64 (*.f64 Om 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 (*.f64 Om Om) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l (neg.f64 l))) (neg.f64 (*.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 l) Om)) Om)
(/.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 Om Om) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 l (neg.f64 l)) (-.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 (*.f64 l l) Om) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) Om)
(/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l)) Om) Om)
(pow.f64 (/.f64 (*.f64 Om Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) #s(literal -1 binary64))
(pow.f64 (*.f64 (sin.f64 kx) (/.f64 l Om)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 l Om) (sin.f64 kx)) #s(literal 2 binary64))
(*.f64 l (*.f64 (/.f64 l (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))
(*.f64 (/.f64 l Om) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))
(*.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (*.f64 l (/.f64 l (*.f64 Om Om)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l (/.f64 l (*.f64 Om Om))))
(*.f64 (*.f64 l l) (*.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 l (/.f64 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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) Om) (/.f64 (*.f64 l l) Om))
(*.f64 (*.f64 (sin.f64 kx) (/.f64 l Om)) (*.f64 (sin.f64 kx) (/.f64 l Om)))
(*.f64 (*.f64 (/.f64 l Om) (sin.f64 kx)) (*.f64 (/.f64 l Om) (sin.f64 kx)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) l) (/.f64 l (*.f64 Om Om)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 l Om)) (/.f64 l Om))
(*.f64 (*.f64 (*.f64 l (/.f64 l (*.f64 Om Om))) (sin.f64 kx)) (sin.f64 kx))
(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)))
(-.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 #s(literal 2 binary64)) (log.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 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 4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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/2 binary64)))))
(+.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) (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 l l)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) (fma.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) (cos.f64 (+.f64 kx kx)))))
(+.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) #s(literal 4 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(literal 4 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))
(exp.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)))))
(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 #s(literal 4 binary64) (*.f64 l l))))) #s(literal -1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 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 4 binary64)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))
(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) #s(literal 4 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(literal 4 binary64))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) (*.f64 (*.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)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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/2 binary64)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) (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 l l)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) (fma.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) (cos.f64 (+.f64 kx kx)))))
(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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)))))
(/.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 #s(literal 4 binary64) (*.f64 l l)))) #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 (*.f64 #s(literal 4 binary64) (*.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) (*.f64 l l))) (*.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 #s(literal 4 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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)))) (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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om)) 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 l #s(literal 4 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 #s(literal 4 binary64) (*.f64 l 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))) (*.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 l 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))) (*.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 l l)))) (*.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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l))))) (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 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64)) (*.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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l))))) (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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om))) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #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))))) 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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.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 (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 #s(literal 4 binary64) (*.f64 l l))) Om)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 l Om) #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 Om l))
(/.f64 (*.f64 l (*.f64 (*.f64 (/.f64 l Om) #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 (neg.f64 l) (*.f64 (*.f64 (/.f64 l Om) #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))))) (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 Om) #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 #s(literal 4 binary64) (*.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 (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 #s(literal 4 binary64) (*.f64 l l)) (*.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 (exp.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 #s(literal 4 binary64) (*.f64 l l))))) (*.f64 Om Om))
(/.f64 (exp.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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)))))) (exp.f64 (log.f64 (neg.f64 (*.f64 Om Om)))))
(/.f64 (exp.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 #s(literal 4 binary64) (*.f64 l l)) Om)))) (exp.f64 (log.f64 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)))) #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 #s(literal 4 binary64) (*.f64 l l)))) #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 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (/.f64 l Om) #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 Om) (*.f64 (*.f64 (/.f64 l Om) #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 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 Om) #s(literal 4 binary64))))
(*.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 (/.f64 l Om) #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)))) #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 Om) #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 (/.f64 l Om) #s(literal 4 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)))) #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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om 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 l Om) #s(literal 4 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 (/.f64 l Om) #s(literal 4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l 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))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l 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))) (*.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 l l))) (/.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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)))) (/.f64 #s(literal 1 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))) Om) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #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 (/.f64 l (*.f64 Om Om))))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) #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 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 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l)))) (/.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om 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 #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om))
(*.f64 (exp.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))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)))
(*.f64 (exp.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 #s(literal 4 binary64) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (exp.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))) Om))) (exp.f64 (log.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om))))
(+.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (*.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/2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (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 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 l 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/2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 l l))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 l l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 4 binary64) (*.f64 l l))))
(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 #s(literal 4 binary64) (*.f64 l l)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 l 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/2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 l l))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 l l))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.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/2 binary64)))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 4 binary64) (*.f64 l 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 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 l 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 (*.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 l 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 (*.f64 #s(literal 4 binary64) (*.f64 l 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)))) (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 l 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 (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 #s(literal 4 binary64) (*.f64 l l))) #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 #s(literal 4 binary64) (*.f64 l l)))
(*.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 #s(literal 4 binary64) (*.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 (*.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 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 (fma.f64 #s(literal -1/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)

eval619.0ms (4.5%)

Memory
-155.6MiB live, 710.9MiB allocated
Compiler

Compiled 120 194 to 8 128 computations (93.2% saved)

prune289.0ms (2.1%)

Memory
-42.7MiB live, 614.1MiB allocated
Pruning

14 alts after pruning (13 fresh and 1 done)

PrunedKeptTotal
New1 966131 979
Fresh303
Picked415
Done000
Total1 973141 987
Accuracy
100.0%
Counts
1 987 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
60.3%
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
91.4%
(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)))))))
92.2%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(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)))))))
47.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
37.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
65.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
76.9%
(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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
76.4%
(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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
73.8%
(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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/2 binary64))))
49.1%
(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) #s(approx (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1))) (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))) #s(literal 1/2 binary64))))
48.7%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))))
33.6%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))))
54.2%
(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)))
81.7%
#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 (+.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))))))))
Compiler

Compiled 727 to 500 computations (31.2% saved)

simplify215.0ms (1.6%)

Memory
28.3MiB live, 296.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 #s(literal 1/4 binary64) (/.f64 Om l))
cost-diff0
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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-diff0
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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-diff0
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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-diff0
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
cost-diff0
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
cost-diff0
#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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))))
cost-diff0
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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)))))
cost-diff0
#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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
cost-diff0
(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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
cost-diff128
(+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
cost-diff0
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))
cost-diff0
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
cost-diff320
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(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-diff384
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 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))
Rules
7 802×lower-*.f32
7 778×lower-*.f64
5 534×lower-fma.f32
5 522×lower-fma.f64
1 700×times-frac
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01191217
01771217
13301131
28901088
351711088
081441038
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(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 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))))))
#s(literal 1/2 binary64)
(+.f64 #s(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)))))
#s(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))))
(*.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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))
#s(literal 1 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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
#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))))) (+.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) (fma.f64 #s(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 #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) (fma.f64 #s(literal -1/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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(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 #s(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 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 4 binary64)
(/.f64 (*.f64 (*.f64 l 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 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 l l)
l
(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)
(*.f64 Om Om)
Om
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))))
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(*.f64 l l)
l
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(neg.f64 (*.f64 Om Om))
(*.f64 Om Om)
Om
#s(literal 1 binary64)
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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)
Outputs
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(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 l (/.f64 (*.f64 l (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))) (*.f64 Om Om)) #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 Om) #s(literal 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 l (/.f64 (*.f64 l (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 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 (*.f64 (/.f64 l Om) #s(literal 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 l (/.f64 (*.f64 l (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))) (*.f64 Om Om)) #s(literal 1 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)))) (+.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 l (/.f64 (*.f64 l (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 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 l (/.f64 (*.f64 l (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 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 l (/.f64 (*.f64 l (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 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))
(*.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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))
#s(literal 1 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))))) (+.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) (fma.f64 #s(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 #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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
#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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
#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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+.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) (fma.f64 #s(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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
#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) (fma.f64 #s(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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
(/.f64 #s(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 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
#s(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 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
#s(literal 4 binary64)
(/.f64 (*.f64 (*.f64 l 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 -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 l l)
l
(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)
(*.f64 Om Om)
Om
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (/.f64 l (*.f64 Om (neg.f64 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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (/.f64 l (*.f64 Om (neg.f64 Om))) #s(literal 1 binary64))))
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (/.f64 l (*.f64 Om (neg.f64 Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (/.f64 l (*.f64 Om (neg.f64 Om))) #s(literal 1 binary64))
(*.f64 l l)
l
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om)))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om (neg.f64 Om)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(neg.f64 (*.f64 Om Om))
(*.f64 Om (neg.f64 Om))
(*.f64 Om Om)
Om
#s(literal 1 binary64)
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(cos.f64 (*.f64 kx #s(literal -2 binary64)))
(*.f64 kx #s(literal -2 binary64))
kx
#s(literal -2 binary64)
(cos.f64 (*.f64 ky #s(literal -2 binary64)))
(*.f64 ky #s(literal -2 binary64))
ky
#s(literal 1/2 binary64)

localize583.0ms (4.3%)

Memory
8.5MiB live, 830.1MiB allocated
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy0.2497367948301486
(+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
accuracy2.6727974428082257
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))
accuracy5.744576753776472
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))
accuracy34.44443366296459
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
accuracy0.08203125
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy0.2081989854738095
#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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))))
accuracy2.9062830126099026
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
accuracy4.241335119136557
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om)))
accuracy0.20807536632048354
#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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
accuracy0.892953725946471
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
accuracy5.7340803783157845
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy7.278097128030545
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
accuracy0
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
accuracy0.21602135433419117
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))
accuracy0.04296875
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
accuracy0.5753038207939921
(*.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))
accuracy5.7340803783157845
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy8.389243110221983
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
Samples
202.0ms70×2valid
70.0ms90×0invalid
60.0ms37×1valid
44.0ms38×0valid
37.0ms19×1invalid
1.0ms1exit
Compiler

Compiled 1 067 to 100 computations (90.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 357.0ms
ival-mult: 94.0ms (26.4% of total)
ival-cos: 85.0ms (23.8% of total)
ival-add: 43.0ms (12.1% of total)
adjust: 38.0ms (10.7% of total)
ival-div: 33.0ms (9.3% of total)
ival-sqrt: 27.0ms (7.6% of total)
ival-sin: 17.0ms (4.8% of total)
ival-pow2: 14.0ms (3.9% of total)
ival-sub: 4.0ms (1.1% of total)
exact: 1.0ms (0.3% of total)
ival-neg: 1.0ms (0.3% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series278.0ms (2%)

Memory
43.1MiB live, 427.5MiB allocated
Counts
28 → 972
Calls
Call 1
Inputs
#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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 (+.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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())
#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<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 (fma.f64 #s(literal -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>) () ())
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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 #s(literal 1/2 binary64) (+.f64 #s(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 (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 (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (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/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))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (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/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))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor 0 l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) (taylor inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) (taylor inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) (taylor inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) (taylor -inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l))) (taylor -inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l))) (taylor -inf l) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 -inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 -inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 -inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 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 -inf ky) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) (taylor 0 Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) (taylor 0 Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5)))))))))) (taylor 0 Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (patch (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) (patch (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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) (patch #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor 0 l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (taylor inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l) (taylor inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l) (taylor inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) l) (taylor inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (taylor -inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l)) (taylor -inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l)) (taylor -inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) l)) (taylor -inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))))) (taylor -inf ky) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (taylor 0 Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) (taylor 0 Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5))))))))) (taylor 0 Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5))))))))))) (taylor 0 Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) #<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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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 (+ (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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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) (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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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) (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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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) (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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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) (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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) (patch #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (/ (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (* (* (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/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))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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/4 (* (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (* (* (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/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))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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/4 (* (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (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 (/ (* 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<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 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2)) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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) (pow l 2))) (pow l 2))) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 (pow l 2)) (* 2/45 (* (pow ky 2) (pow l 2))))) (pow l 2))) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 (pow l 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow l 2))) (* 2/45 (pow l 2)))))) (pow l 2))) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow kx 2) (pow Om 2))) (taylor 0 kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) (patch (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -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>) () ())) ())
Calls

243 calls:

TimeVariablePointExpression
16.0ms
kx
@0
(+ (* (* 1/4 (/ Om l)) (sqrt (/ 1 (+ (* -1/2 (+ (cos (* kx -2)) (cos (* ky -2)))) 1)))) 1/2)
15.0ms
ky
@0
(sqrt (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))))
6.0ms
kx
@0
(sqrt (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))))
5.0ms
l
@0
(* (/ 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)))))
4.0ms
l
@inf
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1)))))

simplify560.0ms (4.1%)

Memory
7.5MiB live, 918.2MiB allocated
Algorithm
egg-herbie
Rules
8 542×lower-*.f64
8 542×lower-*.f32
5 390×lower-fma.f64
5 390×lower-fma.f32
3 452×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0200166576
1676466428
0802062766
Stop Event
iter limit
node limit
Counts
972 → 972
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))))))))
(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)))))
(* (sqrt 1/2) (sqrt (+ 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/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (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)))))
(* 1/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/4 (* (* (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/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/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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/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))))))))
(+ (* 1/4 (* (* (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/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)))))))))
(+ (* 1/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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
(+ 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
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l)))
1
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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) (+ 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))))))))
(+ 1/2 (* 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))))))))
(+ 1/2 (* 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))))))))
(+ 1/2 (* 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))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6))))))
(* (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 (/ (* (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))))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4)))))))))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))))))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))
(/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) l)
(* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))
(* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) l))
1/2
(+ 1/2 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+ 1/2 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(+ 1/2 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 (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)))))))
(* 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)))))))
(* 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)))))))
(* 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)))))))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))
(* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5)))))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5)))))))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6))))))
1/2
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+ 1/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6))))))
(* (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 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
(+ 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/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 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 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 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
1
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2))))))))
(+ 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 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 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 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+ 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 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
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 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
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 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(* (sqrt 1/2) (sqrt (+ 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/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (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)))))
(* 1/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/4 (* (* (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/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/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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/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))))))))
(+ (* 1/4 (* (* (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/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)))))))))
(+ (* 1/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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
(+ 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 (* 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))
(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)))))
(/ (* 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)
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow ky 2) (pow l 2)) (pow Om 2))
(* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (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 (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow ky 2) (pow l 2))
(* (pow ky 2) (+ (* -1/3 (* (pow ky 2) (pow l 2))) (pow l 2)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* 2/45 (* (pow ky 2) (pow l 2))))) (pow l 2)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow l 2))) (* 2/45 (pow l 2)))))) (pow l 2)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* -1 (/ (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))))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(* -1 (/ (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)
(+ 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)))
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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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 (/.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 #s(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 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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/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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))))))
(fma.f64 (neg.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)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (* -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 (neg.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/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) (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 (*.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 #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 (neg.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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(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 (+ 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) (+.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 (neg.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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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) (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 (*.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 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) (fma.f64 #s(literal -1/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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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)))
(+ 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))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sqrt.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (*.f64 kx kx) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 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))))) (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal 4/45 binary64) (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))))) (*.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/4 binary64) (/.f64 (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 ky ky) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))) (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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))))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -1/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))) (*.f64 l (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 binary64) (fma.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 binary64) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 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))))) (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal 4/45 binary64) (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))))) (*.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/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 binary64) (fma.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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))))))))))
(+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 binary64) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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))))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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) (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 -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(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 l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om))))
(+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky ky) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 ky ky)) (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 ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal -1/4 binary64) (fma.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 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)))))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 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/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/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/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/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/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/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/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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))))
(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5))))))))))
(fma.f64 Om (fma.f64 (*.f64 Om Om) (fma.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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)))))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -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 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))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -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 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -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 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))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -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 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))) (*.f64 l (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.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 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 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 #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) (fma.f64 #s(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)))))))))) (neg.f64 (*.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/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) (fma.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 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #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)))))) (neg.f64 (*.f64 (*.f64 (*.f64 ky ky) (/.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))))))))
(+ (* (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)))))))))) (neg.f64 (*.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/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) (fma.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 (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 #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))) (-.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 -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) (fma.f64 #s(literal -1/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)))))))) (neg.f64 (*.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 (*.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))))))) (*.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)))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))))))
(fma.f64 (neg.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)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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))))) (* -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 (neg.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/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) (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 (*.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 #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 (neg.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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(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 (+ 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) (+.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 (neg.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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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) (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 (*.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 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) (fma.f64 #s(literal -1/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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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/2 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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) (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 -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 Om Om)))) #s(literal 1/2 binary64))
(+ 1/2 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 Om Om)))) #s(literal 1/2 binary64))
(* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) l)
(/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 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/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (*.f64 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))) l)
(* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l))
(neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l))
(neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) l))
(* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) l))
(neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 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/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (*.f64 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))) l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om))))
(+ 1/2 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky ky) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 ky ky)) (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/2 binary64))
(+ 1/2 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal -1/4 binary64) (fma.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 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)))))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1/2 binary64))
(* 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/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/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/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/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/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/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/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/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))
(*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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)))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5)))))))))
(*.f64 Om (fma.f64 (*.f64 Om Om) (fma.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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)))))))
(* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (/.f64 #s(literal 1 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 7 binary64)))))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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)))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -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 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))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -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 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -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 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))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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/2 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -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 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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)) (neg.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 #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)) (neg.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 #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))) (-.f64 (*.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 #s(literal -1/2 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)) (neg.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 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 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 Om (/.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) (+ (* -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 Om (/.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 (*.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 Om (/.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 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 Om (/.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) (* -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)) (neg.f64 (/.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)) (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.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)))))) (neg.f64 (/.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 Om (/.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) (* 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 (/.f64 #s(literal 1 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))))) #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 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 (*.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))))) (neg.f64 (/.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)))) (-.f64 (*.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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 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 (*.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))))) (neg.f64 (/.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)))) (-.f64 (*.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))))))
(* (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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.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) (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 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 (*.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) (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)))))))) (neg.f64 (*.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) (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 (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) (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) (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 (*.f64 kx kx) (*.f64 (*.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 -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) (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)))) (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)))))))) (neg.f64 (/.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)))))))))) (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))))))))))) (neg.f64 (*.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) (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 (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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 #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)))))) (neg.f64 (*.f64 (*.f64 (*.f64 ky ky) (/.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) (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 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))) (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 -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 #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 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (neg.f64 (/.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)))))))) (neg.f64 (*.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) (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 (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) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (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 -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 #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 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (neg.f64 (/.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 #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 (*.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 -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 #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 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)))))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (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 -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 #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 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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) (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 (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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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/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 (*.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 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.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)))) (*.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 #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 (*.f64 #s(literal 1/4 binary64) 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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.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)))))) (*.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 #s(literal 1/4 binary64) (*.f64 (/.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)))))) (*.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
#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) (neg.f64 (/.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) (neg.f64 (/.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 (*.f64 #s(literal 1/4 binary64) 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 (/.f64 #s(literal 1 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) (*.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 (*.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 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 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) (/.f64 #s(literal 1 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) (neg.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)))) (*.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)))))
(+.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))) (neg.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)))) (*.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 #s(literal 2 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 (*.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)))) (neg.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)))) (*.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) (neg.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)))) (*.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)))))
(+.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))) (neg.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)))) (*.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 #s(literal 2 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 (*.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)))) (neg.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)))) (*.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)))))))))
(fma.f64 #s(literal 1/2 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 (neg.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) (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) (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 (neg.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (+.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) (fma.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 (*.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 -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) (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)))) (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 (neg.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (+.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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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)))))))))
(fma.f64 (neg.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)))) (fma.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))))) (* -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 #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 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 (neg.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) (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 #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) (fma.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 #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 kx) #s(literal 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) (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 #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 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 (neg.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) (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 #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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (+ 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 (*.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 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 kx kx)) (*.f64 Om Om))))
(+ 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) (fma.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)))))) (neg.f64 (/.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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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 #s(literal 1/2 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 (+ (* -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) (neg.f64 (/.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) (neg.f64 (/.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/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) (-.f64 (/.f64 (*.f64 #s(literal 3/512 binary64) (*.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) (neg.f64 (/.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))) (neg.f64 (/.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))) (* -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 #s(literal 1 binary64) (fma.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)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))) (neg.f64 (/.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))) (* -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 #s(literal 1 binary64) (fma.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)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))))
(* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (pow (sin kx) 2) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 kx kx)) (*.f64 Om Om))))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow kx 2) (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 1/3 binary64) (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) (+ (* -2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (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 -2/45 binary64) (/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))))
(* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))
(/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))
(/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))
(/ (+ (* -1 (* (pow l 2) (pow (sin kx) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sqrt.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (*.f64 kx kx) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 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))))) (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal 4/45 binary64) (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))))) (*.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/4 binary64) (/.f64 (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 ky ky) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))) (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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))))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -1/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))) (*.f64 l (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 binary64) (fma.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 binary64) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 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))))) (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal 4/45 binary64) (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))))) (*.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/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 binary64) (fma.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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))))))))))
(+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 binary64) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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))))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(neg.f64 (*.f64 Om (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (neg.f64 (/.f64 #s(literal 1/2 binary64) Om)))))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(neg.f64 (*.f64 Om (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (neg.f64 (/.f64 #s(literal 1/2 binary64) Om)))))
(* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))))) (* 1/2 (/ 1 Om)))))
(neg.f64 (*.f64 Om (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 (*.f64 Om (*.f64 kx kx)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))) l) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.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 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 Om (*.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 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 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))) l))) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.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 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.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 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 Om (*.f64 ky ky)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) l) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.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 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 4 binary64))))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) l))) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.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 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)
(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))
(/ (* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 -1/3 binary64) (/.f64 l Om) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l (*.f64 ky ky)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) Om)
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow ky 2) (pow l 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om))
(* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal 2/45 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal -1/315 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal 2/45 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.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 (* -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))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow ky 2) (pow l 2))
(*.f64 (*.f64 l l) (*.f64 ky ky))
(* (pow ky 2) (+ (* -1/3 (* (pow ky 2) (pow l 2))) (pow l 2)))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) #s(literal -1/3 binary64) (*.f64 l l)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* 2/45 (* (pow ky 2) (pow l 2))))) (pow l 2)))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) (*.f64 l l) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 l l)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow l 2))) (* 2/45 (pow l 2)))))) (pow l 2)))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) #s(literal -1/315 binary64) (*.f64 (*.f64 l l) #s(literal 2/45 binary64))) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 l l)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* -1 (/ (pow kx 2) (pow Om 2)))
(neg.f64 (/.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) (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (*.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) (-.f64 (*.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) (-.f64 (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (-.f64 (/.f64 (*.f64 #s(literal 1/315 binary64) (*.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))))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(* -1 (/ (pow (sin kx) 2) (pow Om 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(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))
(+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (pow kx 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 kx kx)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)))))
(+ 1 (+ (* -1/2 (+ 1 (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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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)) (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (pow ky 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 ky ky)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 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 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 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 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ 1 (cos (* -2 kx)))
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ 1 (+ (cos (* -2 kx)) (* -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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))

rewrite260.0ms (1.9%)

Memory
-44.8MiB live, 330.2MiB allocated
Rules
3 714×lower-*.f32
3 692×lower-*.f64
2 870×lower-fma.f32
2 858×lower-fma.f64
2 298×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0118908
0174904
1693682
26098682
08213643
Stop Event
iter limit
node limit
iter limit
Counts
28 → 462
Calls
Call 1
Inputs
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 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 #s(literal 1/2 binary64) (+.f64 #s(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) (cos.f64 (+.f64 kx kx))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))
(+.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) (fma.f64 #s(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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
#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))))) (+.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) (fma.f64 #s(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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 #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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))))
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (/.f64 l Om) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 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 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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om)))
(pow.f64 (sin.f64 kx) #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))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/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))))
Outputs
(+.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (/.f64 l Om) #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))))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (/.f64 l Om) #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)))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 (/.f64 l Om) #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)))) #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 Om) #s(literal 4 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 Om) #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 (/.f64 l Om) #s(literal 4 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)))) #s(literal 1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (*.f64 (/.f64 l Om) #s(literal 4 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 (/.f64 l Om) #s(literal 4 binary64)) #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)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l 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))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l 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))) (*.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 #s(literal 4 binary64) (*.f64 l l))) (/.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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)))) (/.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))) Om) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 4 binary64) (*.f64 l l))) #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 (*.f64 (/.f64 l Om) #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 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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.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 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.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 #s(literal 4 binary64) (*.f64 l l))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.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))) Om) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 binary64)) #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 #s(literal 4 binary64) (*.f64 l l)))) (/.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 (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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1/2 binary64)) #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 #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) Om) #s(literal 1 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 6 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 4 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 4 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))))
(/.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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))) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal -1 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #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 (fma.f64 #s(literal -1/2 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) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 3 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #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))
(-.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)))) (*.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 (*.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 (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))))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))
(/.f64 (neg.f64 (+.f64 (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 (*.f64 (fma.f64 #s(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 #s(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) (fma.f64 #s(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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 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) (*.f64 (fma.f64 #s(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 #s(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) (fma.f64 #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1 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 (/.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 2 binary64))))) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(/.f64 (-.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 (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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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))))))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/4 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #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 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))) #s(literal 1/4 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.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)))))))) #s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))))
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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 (/.f64 (*.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 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64))))
(fma.f64 l (/.f64 (*.f64 l (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 (*.f64 l (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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 l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal 1 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 #s(literal -1 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))
(fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64))
(fma.f64 (/.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 l l) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (/.f64 (*.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) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) Om) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (*.f64 Om Om))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) (-.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 (*.f64 l l) #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)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) (neg.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 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64)) (+.f64 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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))) (+.f64 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (neg.f64 (*.f64 (/.f64 (*.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 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) #s(literal -1 binary64)) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64)))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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)))) (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64)) (+.f64 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.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 (neg.f64 (*.f64 (/.f64 (*.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 2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) #s(literal -1 binary64))))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 Om #s(literal 1/4 binary64)) l) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))
(+.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 (*.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 (fma.f64 #s(literal -1/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 #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 (*.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 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 #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 (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))) #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 (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)))) #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 (*.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))) (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) (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) (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 (/.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) (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) (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))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om))))
(neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 l l))) (*.f64 Om Om)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (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 Om (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) 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))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 l l))) (neg.f64 (*.f64 Om Om)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om)) Om)
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 l l)))) (*.f64 Om Om))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om))) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (*.f64 l l) (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 Om))
(/.f64 (*.f64 (/.f64 (*.f64 l l) Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(/.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 l l))) Om) (neg.f64 Om))
(/.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 l l))) #s(literal -1 binary64)) (*.f64 Om Om))
(pow.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (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 (*.f64 Om Om) (*.f64 (*.f64 l l) (fma.f64 #s(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 Om (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om))) #s(literal -1 binary64))
(*.f64 l (*.f64 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 l (*.f64 (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(*.f64 l (/.f64 (*.f64 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 l 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))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.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 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 l l))) (/.f64 #s(literal -1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 (*.f64 l l) Om) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om))
(*.f64 (/.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 l) Om))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 (*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.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 l l))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64)))) (fma.f64 (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)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (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 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64)))) (fma.f64 (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) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64))))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(+.f64 (*.f64 l (*.f64 l #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 l #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 l (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 l l) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 l l)) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 (*.f64 l l) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 l l) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) l) l (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) l) l (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 l l) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal -1/2 binary64) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) #s(literal 3 binary64)) (pow.f64 (*.f64 l (*.f64 l #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (-.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/2 binary64))) (*.f64 l (*.f64 l #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 l (*.f64 l #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l)))) (*.f64 (*.f64 l (*.f64 l #s(literal 1/2 binary64))) (*.f64 l (*.f64 l #s(literal 1/2 binary64))))) (-.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 l (*.f64 l #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (*.f64 l l) (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))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64)))))
(/.f64 (*.f64 (*.f64 l l) (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 (*.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 l l)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #s(literal -2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/4 binary64)))))
(/.f64 (*.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 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(*.f64 l (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l l))
(*.f64 (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) l)
(exp.f64 (*.f64 (log.f64 (/.f64 (neg.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 0 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 Om Om)))
(neg.f64 (/.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 (neg.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 (neg.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (neg.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))))) (*.f64 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 (*.f64 Om Om)))
(/.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 Om)) Om)
(/.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)) (neg.f64 (*.f64 Om 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 (neg.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 (/.f64 (neg.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))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.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) (neg.f64 (*.f64 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 #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 (neg.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 (/.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 (sin.f64 kx) Om) (/.f64 (sin.f64 kx) (neg.f64 Om)))
(*.f64 (/.f64 (sin.f64 kx) (neg.f64 Om)) (/.f64 (sin.f64 kx) Om))
(*.f64 (/.f64 (sin.f64 kx) #s(literal -1 binary64)) (/.f64 (sin.f64 kx) (*.f64 Om Om)))
(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)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 kx)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 ky)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(pow.f64 (sin.f64 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))
(pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) #s(literal 1/4 binary64)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.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 (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 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 #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))))

eval267.0ms (1.9%)

Memory
49.2MiB live, 389.3MiB allocated
Compiler

Compiled 88 784 to 4 942 computations (94.4% saved)

prune220.0ms (1.6%)

Memory
-16.1MiB live, 385.1MiB allocated
Pruning

13 alts after pruning (11 fresh and 2 done)

PrunedKeptTotal
New1 42591 434
Fresh628
Picked415
Done011
Total1 435131 448
Accuracy
100.0%
Counts
1 448 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
92.2%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))))
91.4%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))))
76.9%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
37.6%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1/4 binary64) #s(literal 1/2 binary64))))
47.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
65.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
37.3%
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
48.1%
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))))
49.3%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64)))))
33.6%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))))
31.6%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) #s(approx (+ (* (* l l) (/ (pow (sin kx) 2) (neg (* Om Om)))) 1) (/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))))))
54.2%
(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)))
76.2%
#s(approx (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)))))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))))
Compiler

Compiled 634 to 438 computations (30.9% saved)

simplify237.0ms (1.7%)

Memory
-4.4MiB live, 315.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 l l)
cost-diff0
(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))
cost-diff0
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))
cost-diff0
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
cost-diff0
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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-diff0
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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-diff320
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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-diff0
#s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))
cost-diff0
#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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))
cost-diff0
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))))
cost-diff128
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))
cost-diff0
(fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))
cost-diff0
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* 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-diff0
#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 (* (pow (sin kx) 2) (/ (* l l) (* 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-diff0
(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 (* (pow (sin kx) 2) (/ (* l l) (* 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-diff0
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))))
cost-diff320
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))
cost-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))
Rules
7 660×lower-*.f32
7 638×lower-*.f64
5 730×lower-fma.f32
5 718×lower-fma.f64
2 258×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01261463
01771459
13691365
210691315
356931315
082641263
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(cos.f64 (*.f64 ky #s(literal -2 binary64)))
(*.f64 ky #s(literal -2 binary64))
ky
#s(literal -2 binary64)
(cos.f64 (*.f64 kx #s(literal -2 binary64)))
(*.f64 kx #s(literal -2 binary64))
kx
(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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))))
#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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))
#s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(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) (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) (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 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 l l)
l
(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 Om Om)
Om
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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)
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))
(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))
(*.f64 l 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)))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 binary64)
(neg.f64 (*.f64 Om Om))
(*.f64 Om Om)
Om
Outputs
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(cos.f64 (*.f64 ky #s(literal -2 binary64)))
(*.f64 ky #s(literal -2 binary64))
ky
#s(literal -2 binary64)
(cos.f64 (*.f64 kx #s(literal -2 binary64)))
(*.f64 kx #s(literal -2 binary64))
kx
(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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (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 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))
#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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (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 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))
#s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 l l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(neg.f64 (/.f64 (*.f64 (*.f64 l 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 -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (neg.f64 (*.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))
(*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 l l)
l
(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 Om Om)
Om
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #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 Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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 #s(literal 4 binary64) (*.f64 l l)) (*.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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 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))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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 #s(literal 4 binary64) (*.f64 l l)) (*.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)
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 l l) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 l l) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(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))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 l l) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(*.f64 l 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)))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (neg.f64 (*.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))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(cos.f64 (*.f64 kx #s(literal -2 binary64)))
(*.f64 kx #s(literal -2 binary64))
kx
#s(literal -2 binary64)
(cos.f64 (*.f64 ky #s(literal -2 binary64)))
(*.f64 ky #s(literal -2 binary64))
ky
#s(literal 1 binary64)
(neg.f64 (*.f64 Om Om))
(*.f64 Om Om)
Om

localize418.0ms (3.1%)

Memory
23.9MiB live, 730.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.2497367948301486
(+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
accuracy1.4673367193655706
(/.f64 (fma.f64 #s(literal -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)))
accuracy4.60161476996568
(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))
accuracy5.744576753776472
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))
accuracy0.0078125
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))
accuracy0.5753038207939921
(*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
accuracy5.734080378315779
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy6.935495130259457
#s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
accuracy0.20807536632048354
#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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))
accuracy0.892953725946471
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
accuracy5.734080378315779
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy7.278097128030545
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
accuracy0.0390625
(*.f64 l (sin.f64 kx))
accuracy0.2081989854738095
#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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64))))
accuracy2.4562516590622754
(/.f64 Om (*.f64 l (sin.f64 kx)))
accuracy34.94556969857651
#s(approx (+ (* 1/2 (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))
accuracy0.0078125
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))
accuracy0.2497367948301486
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
accuracy0.5753038207939921
(*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))
accuracy5.744576753776472
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
Samples
83.0ms112×0valid
74.0ms90×0invalid
54.0ms19×1invalid
47.0ms19×2valid
20.0ms14×1valid
2.0ms1exit
Compiler

Compiled 1 099 to 103 computations (90.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 234.0ms
ival-cos: 68.0ms (29% of total)
ival-mult: 48.0ms (20.5% of total)
ival-add: 31.0ms (13.2% of total)
ival-div: 26.0ms (11.1% of total)
ival-sqrt: 18.0ms (7.7% of total)
adjust: 14.0ms (6% of total)
ival-pow2: 13.0ms (5.5% of total)
ival-sin: 12.0ms (5.1% of total)
ival-sub: 3.0ms (1.3% of total)
ival-neg: 2.0ms (0.9% of total)
exact: 1.0ms (0.4% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series276.0ms (2%)

Memory
-8.7MiB live, 343.0MiB allocated
Counts
33 → 1 260
Calls
Call 1
Inputs
#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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())
#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())
#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())
#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())
#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())
#s(alt (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)) (patch (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)) #<representation binary64>) () ())
#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/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 (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/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 (fma.f64 #s(literal -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 (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<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>) () ())
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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (patch (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (patch (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* 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 (* 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 (* 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/4 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* 1/24 (/ 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 (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (- (* 1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (- (* (pow ky 2) (- (* -2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* -1/3 (/ (pow l 2) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2)) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2)) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2)) (taylor 0 Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) (patch (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor 0 l) (#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor inf Om) (#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt 2)) (taylor -inf Om) (#s(alt (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) (patch (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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) (patch #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) (taylor inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) (taylor inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) (taylor inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) (taylor -inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l))) (taylor -inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l))) (taylor -inf l) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 -inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 -inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 -inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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 -inf ky) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) (taylor 0 Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))) (taylor 0 Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5)))))))))) (taylor 0 Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) (patch #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))) #<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))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* (/ 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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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/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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* (/ (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* (/ 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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (/ (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (/ (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* (/ 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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* 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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* 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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (taylor inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (taylor -inf Om) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (* -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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (+ (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -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 (* 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor -inf l) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 Om) (#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (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/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))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf kx) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* (* (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/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))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/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/4 (* (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/4 (* (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/4 (* (* (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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)))))))) (taylor inf ky) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ 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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<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) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))) (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))) (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))) (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))) (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor 0 l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor 0 l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor 0 l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor 0 l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor -inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor -inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor -inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<representation binary64>) () ())) ())
#s(alt (pow l 2) (taylor -inf l) (#s(alt (*.f64 l l) (patch (*.f64 l l) #<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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (* -2 kx))) (taylor 0 ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf ky) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (* -2 ky))) (taylor 0 kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 kx)) (cos (* -2 ky))) (taylor -inf kx) (#s(alt (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (patch (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #<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 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2)) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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) (pow l 2))) (pow l 2))) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 (pow l 2)) (* 2/45 (* (pow ky 2) (pow l 2))))) (pow l 2))) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 (pow l 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow l 2))) (* 2/45 (pow l 2)))))) (pow l 2))) (taylor 0 ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (taylor -inf ky) (#s(alt (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 l l) (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 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 (/ (* 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 (+ 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 (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (* -1 (/ (pow kx 2) (pow Om 2)))) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (* (pow kx 2) (- (* 1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2))))) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (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))))) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* -1 (/ (pow ky 2) (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* (pow ky 2) (- (* 1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2))))) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* (pow ky 2) (- (* (pow ky 2) (+ (* -2/45 (/ (pow ky 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor 0 Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (taylor -inf Om) (#s(alt (/.f64 (fma.f64 #s(literal -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))) (patch (/.f64 (fma.f64 #s(literal -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))) #<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>) () ())) ())
Calls

315 calls:

TimeVariablePointExpression
38.0ms
kx
@0
(+ (* 1/4 (/ Om (* l (sin kx)))) 1/2)
3.0ms
ky
@0
(sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
1.0ms
l
@0
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1)))))
1.0ms
kx
@inf
(+ (* (* l l) (/ (+ (* -1/2 (+ (cos (* kx -2)) (cos (* ky -2)))) 1) (neg (* Om Om)))) 1)
1.0ms
kx
@-inf
(+ (* (* l l) (/ (+ (* -1/2 (+ (cos (* kx -2)) (cos (* ky -2)))) 1) (neg (* Om Om)))) 1)

simplify561.0ms (4.1%)

Memory
11.3MiB live, 760.2MiB allocated
Algorithm
egg-herbie
Rules
8 542×lower-*.f64
8 542×lower-*.f32
5 624×lower-fma.f64
5 624×lower-fma.f32
3 582×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0201068643
1683468458
0807864290
Stop Event
iter limit
node limit
Counts
1 260 → 1 260
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)))))))))
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))))))
(+ 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)))))))
(* (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 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
(+ 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/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))))
(* Om (+ (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))
(* Om (+ (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))
(* 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/4 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* 1/24 (/ 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 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))))
(+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))))
(+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))))
(* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
1
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow ky 2) (- (* 1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2)))))
(+ 1 (* (pow ky 2) (- (* (pow ky 2) (- (* -2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* -1/3 (/ (pow l 2) (pow Om 2))))) (/ (pow l 2) (pow Om 2)))))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2))
(/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2))
(/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (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 (/ (* (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))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l)))
1
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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) (+ 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))))))))
(+ 1/2 (* 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))))))))
(+ 1/2 (* 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))))))))
(+ 1/2 (* 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))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (pow Om 6))))))
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)))))))))
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))))))
(+ 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)))))))
(* (sqrt 1/2) (sqrt (+ 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/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (sqrt 1/2) (sqrt (+ 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)))))))))
(* (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)))))
(* 1/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/4 (* (* (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/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/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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/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))))))))
(+ (* 1/4 (* (* (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/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)))))))))
(+ (* 1/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/4 (* (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/4 (* (* (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/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/4 (* (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/4 (* (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/4 (* (* (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/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/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/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/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/2 (+ 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/2 (+ 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/2 (+ 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/2 (+ 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
(+ 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
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))) (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))) (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2)))))))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))) (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))) (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2)))))))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))
(/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2))
(/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(pow l 2)
(+ 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)))))
(+ 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)))))
(/ (* 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 (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)))
(+ 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)))
(/ 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))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow ky 2) (pow l 2)) (pow Om 2))
(* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (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 (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow ky 2) (pow l 2))
(* (pow ky 2) (+ (* -1/3 (* (pow ky 2) (pow l 2))) (pow l 2)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* 2/45 (* (pow ky 2) (pow l 2))))) (pow l 2)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow l 2))) (* 2/45 (pow l 2)))))) (pow l 2)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(* (pow l 2) (+ 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)))))
(/ (* 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 (* -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)))))
(* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2)))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (* -1 (/ (pow kx 2) (pow Om 2))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (* (pow kx 2) (- (* 1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2)))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (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)))))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2)))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* -1 (/ (pow ky 2) (pow Om 2))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* (pow ky 2) (- (* 1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2)))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* (pow ky 2) (- (* (pow ky 2) (+ (* -2/45 (/ (pow ky 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2)))))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(+ 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)))
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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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 kx kx) (/.f64 (*.f64 l l) (*.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 kx kx) (/.f64 (*.f64 l l) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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 (*.f64 l l) (*.f64 ky ky)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 kx kx) (/.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/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 (neg.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/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) (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 (*.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 #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 (neg.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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.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)))) (+.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) (fma.f64 #s(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 (+ 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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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) (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 (*.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 -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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 (*.f64 Om (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.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 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 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))))))) (neg.f64 (*.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/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) (fma.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 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.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))))))))
(+ (* (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)))))))))) (neg.f64 (*.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/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) (fma.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 (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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.f64 (fma.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.f64 (+.f64 (fma.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om Om))))
(+ 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 kx kx) (/.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))))) (* -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 (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 (*.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 (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 (*.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 #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 #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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)))))))
(+.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 (*.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)))) (sqrt.f64 (/.f64 #s(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 (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 (*.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 (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 (*.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 -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 #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.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)) (neg.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 #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)) (neg.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 #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))) (-.f64 (*.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 #s(literal -1/2 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)) (neg.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 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 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 (*.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)) (neg.f64 (/.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 #s(literal 1/32 binary64) (/.f64 (*.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)) (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.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)))))) (neg.f64 (/.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 (/.f64 #s(literal 1 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))))) #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.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 (neg.f64 (/.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))))
(+ (* -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 (neg.f64 (/.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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))))) (neg.f64 (/.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)))) (-.f64 (*.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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.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 (neg.f64 (/.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))))
(+ (* -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 (neg.f64 (/.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.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))))) (neg.f64 (/.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)))) (-.f64 (*.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))))))
(* (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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.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) (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 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)))))))))) (neg.f64 (*.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) (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 (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) (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) (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 #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 (*.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) (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 (*.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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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) (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 (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 (*.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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.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) (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 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 (*.f64 #s(literal 1/2 binary64) (*.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 #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 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))))))) (neg.f64 (*.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) (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 (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) (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) (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 #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 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 #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 (*.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 -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 #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 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)))))))) (neg.f64 (/.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 #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 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))))))))))))) (neg.f64 (*.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) (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 (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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.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 (* (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 (*.f64 #s(literal 1/4 binary64) 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 #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 (+.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 #s(literal 1/4 binary64) 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 (+ (* -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 (*.f64 #s(literal 1/4 binary64) 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) (neg.f64 (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.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) (neg.f64 (/.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 #s(literal -1/32 binary64) (*.f64 (/.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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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 (*.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 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 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) (/.f64 #s(literal 1 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) (neg.f64 (*.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)))))
(+.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))) (neg.f64 (*.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)))) (neg.f64 (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.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)))))
(+.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))) (neg.f64 (*.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)))) (neg.f64 (*.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)))))))))
(fma.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 kx kx) (/.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) (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) (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 (neg.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (+.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) (fma.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 (*.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 -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 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 (neg.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (+.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 (*.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)))))))))
(fma.f64 (neg.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)))) (fma.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))))) (* -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 #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 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 (neg.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) (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 #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) (fma.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 #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 kx) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 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 (*.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 #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 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 (neg.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) (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 #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 kx 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
(+ 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) (fma.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)))))) (neg.f64 (/.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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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 #s(literal 1/2 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 (+ (* -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) (neg.f64 (/.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) (neg.f64 (/.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/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) (-.f64 (/.f64 (*.f64 #s(literal 3/512 binary64) (*.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) (neg.f64 (/.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))) (neg.f64 (/.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))) (* -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 #s(literal 1 binary64) (fma.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)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.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))) (neg.f64 (/.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))) (* -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 #s(literal 1 binary64) (fma.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)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 Om Om)))))
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/4 binary64) (*.f64 l (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) Om)))
(* Om (+ (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(*.f64 Om (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) Om)))
(* Om (+ (* 1/2 (/ 1 Om)) (* 1/4 (/ 1 (* l (sin kx))))))
(*.f64 Om (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) Om)))
(* 1/4 (/ Om (* l (sin kx))))
(/.f64 (*.f64 #s(literal 1/4 binary64) Om) (*.f64 l (sin.f64 kx)))
(* Om (+ (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))
(*.f64 Om (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) Om)))
(* Om (+ (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))
(*.f64 Om (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) Om)))
(* Om (+ (* 1/4 (/ 1 (* l (sin kx)))) (* 1/2 (/ 1 Om))))
(*.f64 Om (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 l (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) Om) l)) kx)
(/ (+ (* 1/4 (/ Om l)) (* kx (+ 1/2 (* kx (+ (* -1/4 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* 1/24 (/ 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 (*.f64 #s(literal 1/4 binary64) 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 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om))))))
(+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om))))))
(+ 1 (* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om))))))
(* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* -1 (* (pow l 2) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
(* (pow l 2) (- (/ 1 (pow l 2)) (+ (* -1/2 (/ (cos (* -2 ky)) (pow Om 2))) (* 1/2 (/ 1 (pow Om 2))))))
(*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om))))
(+ 1 (* (pow ky 2) (- (* 1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2)))))
(fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal 1/3 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow ky 2) (- (* (pow ky 2) (- (* -2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* -1/3 (/ (pow l 2) (pow Om 2))))) (/ (pow l 2) (pow Om 2)))))
(fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal -2/45 binary64) (/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(- 1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))
(/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2))
(/.f64 (fma.f64 Om Om (*.f64 (neg.f64 (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2))
(/.f64 (fma.f64 Om Om (*.f64 (neg.f64 (*.f64 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(/ (- (pow Om 2) (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (pow Om 2))
(/.f64 (fma.f64 Om Om (*.f64 (neg.f64 (*.f64 l 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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 (*.f64 Om (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.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 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 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))))))) (neg.f64 (*.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/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) (fma.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 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.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))))))))
(+ (* (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)))))))))) (neg.f64 (*.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/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) (fma.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 (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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 kx kx) (/.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/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 (neg.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/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) (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 (*.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 #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 (neg.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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.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)))) (+.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) (fma.f64 #s(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 (+ 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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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) (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 (*.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 -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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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) (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 -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(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 l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* -2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))) l)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))) l)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (/.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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om))))
(+ 1 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow ky 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 ky ky) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 ky ky)) (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 ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/4 (* (pow ky 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 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal -1/4 binary64) (fma.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 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)))))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 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/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/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/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/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/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/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/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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))))
(fma.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 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/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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 5))))))))))
(fma.f64 Om (fma.f64 (*.f64 Om Om) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 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)))))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -1/4 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))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -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 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4)))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -1/4 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))) #s(literal -12 binary64))) (pow.f64 Om #s(literal 4 binary64))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* -2 ky)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -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 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 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))) #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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l 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
#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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* (pow l 2) (+ (* 4 (/ (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))))
(* 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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 kx kx) (/.f64 (*.f64 l l) (*.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 kx kx) (/.f64 (*.f64 l l) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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 (*.f64 l l) (*.f64 ky ky)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 kx kx) (/.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/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 (neg.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/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) (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 (*.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 #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 (neg.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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (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) (fma.f64 #s(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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.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)))) (+.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) (fma.f64 #s(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 (+ 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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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) (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 (*.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 -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 (neg.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) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(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 (+ 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/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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 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))))))))
(+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky))))))) (* (pow Om 2) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 (*.f64 Om (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.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 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 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))))))) (neg.f64 (*.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/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) (fma.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 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #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)))))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.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))))))))
(+ (* (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)))))))))) (neg.f64 (*.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/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) (fma.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 (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 #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))) (-.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 -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)))))))) (neg.f64 (/.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))))))))))))) (neg.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.f64 (fma.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.f64 (+.f64 (fma.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om Om))))
(+ 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 kx kx) (/.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))))) (* -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 (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 (*.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 (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 (*.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 #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 #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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)))))))
(+.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 (*.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)))) (sqrt.f64 (/.f64 #s(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 (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 (*.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 (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 (*.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 -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 #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (pow kx 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(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))) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (*.f64 kx kx) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -1/4 binary64) (/.f64 (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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))))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (pow ky 2) (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (sqrt 1/2) (sqrt (+ 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))))))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 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 (* 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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (+ 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))))))))))))))
(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))) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(+ (* (sqrt 1/2) (sqrt (+ 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/4 (* (* (sqrt 1/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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* 1/2 (* (* (sqrt 1/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/16 (/ (* (- 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 (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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 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) (* (sqrt 1/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)))))) (- (* -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)))))))))))) (* 1/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))))) (- (* 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/16 (/ (* (- 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 (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 (* 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)))))))) (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))))))))))) (sqrt (/ 1 (+ 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))))))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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))))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -1/4 binary64) (/.f64 (*.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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/16 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 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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))))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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)))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (sqrt 1/2) (sqrt (+ 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 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) (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 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.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))) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 (*.f64 Om (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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* (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)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)))))
(+ (* -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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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)) (-.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))))
(* 1/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (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/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)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 kx kx) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 binary64) (fma.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (*.f64 #s(literal 1/4 binary64) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 (* (* (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/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)))))))))
(fma.f64 #s(literal 1/4 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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (* (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)))))))))))
(fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 binary64) (fma.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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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/4 (* (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/4 (* (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/4 (* (* (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)))))))))))))
(fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (*.f64 #s(literal 1/4 binary64) (fma.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #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))))))) (*.f64 #s(literal -16 binary64) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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) (/.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 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))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 1/2 binary64) (/.f64 (*.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))))) (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 (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 (*.f64 (pow.f64 l #s(literal 4 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 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/4 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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 #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) (neg.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l 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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/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))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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/2 (+ 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/2 binary64) (*.f64 #s(literal 1/2 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (/.f64 Om l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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) (neg.f64 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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)))))
(+.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))
(* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))
(* (pow l 2) (+ (* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2))) (/ 1 (pow l 2))))
(*.f64 (*.f64 l l) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 l l)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (+ (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2)))))
(fma.f64 #s(literal -1 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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))) (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1/3 binary64) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))) (pow Om 2))) (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (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 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -2/45 binary64) (/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (+ (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2)))))
(fma.f64 #s(literal -1 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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))) (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* 1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal 1/3 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))) (pow Om 2))) (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 1/3 (/ (pow l 2) (pow Om 2)))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal -2/45 binary64) (/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2)))
(neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om)))
(/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 Om Om))
(/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 Om Om))
(/ (+ (* -1 (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(+ 1 (* -1 (/ (* (pow l 2) (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))) (pow Om 2))))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))))
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(pow l 2)
(*.f64 l l)
(+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (pow ky 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 ky ky)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))))
(+ 1 (+ (* -1/2 (+ 1 (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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (pow kx 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 kx kx)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)))))
(+ 1 (+ (* -1/2 (+ 1 (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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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)) (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 -1/3 binary64) (/.f64 l Om) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #s(literal -1/3 binary64) (/.f64 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) Om)
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ 1 (cos (* -2 ky)))
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(+ 1 (+ (cos (* -2 ky)) (* -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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(/ 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) (+.f64 (neg.f64 (*.f64 (*.f64 kx kx) (*.f64 (/.f64 Om l) #s(literal -7/360 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 Om l))) (/.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) (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 Om l) #s(literal -1/5040 binary64) (fma.f64 (*.f64 (/.f64 Om l) #s(literal -7/360 binary64)) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 1/720 binary64) Om) l))))) (*.f64 (/.f64 Om l) #s(literal -7/360 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 Om l))) (/.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) (fma.f64 #s(literal 1/120 binary64) (*.f64 l (*.f64 kx kx)) (*.f64 l #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) (fma.f64 l #s(literal 1/120 binary64) (*.f64 (*.f64 l (*.f64 kx kx)) #s(literal -1/5040 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))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow ky 2) (pow l 2)) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om))
(* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) (*.f64 l l)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) (*.f64 Om Om)) #s(literal -1/315 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal 2/45 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky))))) (pow Om 2))
(/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.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 (* -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))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow ky 2) (pow l 2))
(*.f64 (*.f64 l l) (*.f64 ky ky))
(* (pow ky 2) (+ (* -1/3 (* (pow ky 2) (pow l 2))) (pow l 2)))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) #s(literal -1/3 binary64) (*.f64 l l)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* 2/45 (* (pow ky 2) (pow l 2))))) (pow l 2)))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) #s(literal 2/45 binary64) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 l l)))
(* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow l 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow l 2))) (* 2/45 (pow l 2)))))) (pow l 2)))
(*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 l l) (*.f64 ky ky)) #s(literal -1/315 binary64) (*.f64 (*.f64 l l) #s(literal 2/45 binary64))) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 l l)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* (pow l 2) (+ 1/2 (* -1/2 (cos (* -2 ky)))))
(*.f64 (*.f64 l l) (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 (*.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)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ 1 (+ (* -1/2 (cos (* 2 kx))) (* -1/2 (cos (* 2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 -1/3 binary64) (/.f64 l Om) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #s(literal -1/3 binary64) (/.f64 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) Om)
(+ 1 (* -1/2 (+ 1 (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (pow kx 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 kx kx)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)))))
(+ 1 (+ (* -1/2 (+ 1 (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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 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)) (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (* -1/2 (+ 1 (cos (* -2 kx)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (pow ky 2)))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 ky ky)))
(+ 1 (+ (* -1/2 (+ 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))))
(+ 1 (+ (* -1/2 (+ 1 (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) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (* -1 (/ (pow kx 2) (pow Om 2))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 kx kx) (*.f64 Om Om))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (pow Om 2))) (* (pow kx 2) (- (* 1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2)))))
(fma.f64 (*.f64 kx kx) (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 ky))))) (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)))))
(fma.f64 (*.f64 kx kx) (-.f64 (*.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* -1 (/ (pow ky 2) (pow Om 2))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) (neg.f64 (/.f64 (*.f64 ky ky) (*.f64 Om Om))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* (pow ky 2) (- (* 1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2)))))
(fma.f64 (*.f64 ky ky) (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 ky ky)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))))
(+ (* -1 (/ (+ 1 (* -1/2 (+ 1 (cos (* -2 kx))))) (pow Om 2))) (* (pow ky 2) (- (* (pow ky 2) (+ (* -2/45 (/ (pow ky 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2)))))
(fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 ky ky) (*.f64 Om Om)) (/.f64 #s(literal 1/3 binary64) (*.f64 Om Om)))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(* -1 (/ (+ 1 (* -1/2 (+ (cos (* -2 kx)) (cos (* -2 ky))))) (pow Om 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(+ 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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ 1 (cos (* -2 kx)))
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ 1 (+ (cos (* -2 kx)) (* -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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(+ (cos (* -2 kx)) (cos (* -2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))

rewrite296.0ms (2.2%)

Memory
30.3MiB live, 387.7MiB allocated
Rules
3 830×lower-*.f32
3 808×lower-*.f64
3 456×lower-fma.f32
3 444×lower-fma.f64
2 872×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01261139
01781133
1827961
27336961
08159914
Stop Event
iter limit
node limit
iter limit
Counts
33 → 488
Calls
Call 1
Inputs
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)))))))
#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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))))))
#s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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)))
(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))
(*.f64 l l)
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(*.f64 l (sin.f64 kx))
(/.f64 (*.f64 (*.f64 l 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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(*.f64 (*.f64 l l) (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)))
(*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/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) (+.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 (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)))
(+.f64 (cos.f64 (*.f64 kx #s(literal -2 binary64))) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
Outputs
(+.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l #s(literal 4 binary64)) Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 l #s(literal 4 binary64)) Om) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 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(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(/.f64 #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))))) (+.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #s(literal 3 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))))))
(/.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))))))
(/.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (*.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)))))))
(/.f64 (neg.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (*.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)))))
(*.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)))))))
(*.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (+.f64 #s(literal 1/8 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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/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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (+.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (/.f64 (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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)) (+.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64)))))
(/.f64 #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64))) (+.f64 (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64)))) (neg.f64 (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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64)))) (neg.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64)) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64))) (/.f64 #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64))) (/.f64 #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (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 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (-.f64 #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)) (+.f64 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) #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 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (-.f64 #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 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (*.f64 (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/8 binary64)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) #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 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/8 binary64))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) #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 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l)))) (-.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 l (sin.f64 kx)))))
(*.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 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/8 binary64))))))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 Om #s(literal 1/4 binary64)) (*.f64 Om #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l l))) #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))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
(+.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))))
(fma.f64 l (/.f64 (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (/.f64 (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (neg.f64 Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(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 l l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.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 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 l (neg.f64 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)) #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l (neg.f64 l))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) Om) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (neg.f64 Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) Om) (neg.f64 (/.f64 (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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om) (/.f64 (*.f64 l l) (neg.f64 Om)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 (*.f64 l l) Om)) (/.f64 (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 (*.f64 l l) #s(literal -1 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) (neg.f64 Om)) (/.f64 (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 l #s(literal -1 binary64)) (/.f64 (*.f64 l (fma.f64 #s(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 l (neg.f64 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) #s(literal 1 binary64))
(fma.f64 (/.f64 (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 l l) Om) #s(literal 1 binary64))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) Om)) (/.f64 (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))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 3 binary64)))) (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))))
(/.f64 (-.f64 #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)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))) #s(literal 1/4 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))))
#s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
(+.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 (*.f64 l #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 (*.f64 l #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 (*.f64 l #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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal -1 binary64))))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #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 (*.f64 l #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 (/.f64 (*.f64 l #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 (/.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 (*.f64 l #s(literal 4 binary64)) Om)) #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 (*.f64 l #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 (*.f64 l #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(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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.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))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 l #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 (*.f64 l #s(literal 4 binary64)) Om) #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l (*.f64 l #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 (*.f64 l #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 (/.f64 (*.f64 l #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 (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (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 (+.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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))))) (+.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #s(literal 3 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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 3 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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))))))
(/.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #s(literal 3 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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))))))
(/.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal -1 binary64)))
(/.f64 (neg.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #s(literal 3 binary64)))) (neg.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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)))))))
(/.f64 (neg.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #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 (*.f64 l #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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)))))
(*.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #s(literal 3 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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)))))))
(*.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om))) #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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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))
(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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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))
(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 (*.f64 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/8 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #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))))) (*.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/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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #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)))))) (-.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) (+.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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 (*.f64 l #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 (*.f64 l #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 -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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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 (*.f64 l #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 (*.f64 l #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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 -2 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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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))
(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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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))))))
(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 (*.f64 l #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 (*.f64 l #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 (*.f64 l #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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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/4 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 binary64))
(-.f64 (/.f64 #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 (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 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 (*.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 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 binary64))
(fma.f64 (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64)))))
(/.f64 #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64))) (+.f64 (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -3 binary64)))) (neg.f64 (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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64)))) (neg.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64)) #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 (*.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 (sqrt.f64 (fma.f64 #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky 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 -3 binary64))) (/.f64 #s(literal 1 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 (*.f64 l #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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.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 (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -2 binary64))) (/.f64 #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)))))))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))) #s(literal 1/4 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))))
(+.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(fma.f64 l (neg.f64 (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (neg.f64 (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 l l) (*.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) (*.f64 (*.f64 l l) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) Om) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (neg.f64 Om)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) #s(literal -1 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l l) (neg.f64 Om)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) Om) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om)))))
(*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om)))))))
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l l) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(pow.f64 l #s(literal 2 binary64))
(*.f64 l l)
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 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)))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 #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 ky kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))
(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 ky kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (neg.f64 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) Om))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.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 (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 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 kx #s(literal -2 binary64)))))) (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (fma.f64 (cos.f64 (*.f64 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #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 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 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 (+.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))) (fma.f64 (cos.f64 (*.f64 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.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 (-.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)))))
(/.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 (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 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #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 (neg.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)))))))) (neg.f64 (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 #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 #s(literal -2 binary64) (-.f64 ky kx)) #s(literal 1/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 (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 ky kx)) #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 (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 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.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 #s(literal 1 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 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 #s(literal 1 binary64) (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.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 ky kx)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 Om (neg.f64 (*.f64 l (sin.f64 kx)))))
(neg.f64 (/.f64 (neg.f64 Om) (*.f64 l (sin.f64 kx))))
(/.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 #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))
(*.f64 Om (/.f64 #s(literal 1 binary64) (*.f64 l (sin.f64 kx))))
(*.f64 #s(literal 1 binary64) (/.f64 Om (*.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 l (sin.f64 kx))
(*.f64 (sin.f64 kx) l)
(neg.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (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 Om (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) 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))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l (neg.f64 l))) (neg.f64 (*.f64 Om Om)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om)) Om)
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l (neg.f64 l)))) (*.f64 Om Om))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om))) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (*.f64 l l) (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 Om))
(/.f64 (*.f64 (/.f64 (*.f64 l l) Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) Om)
(/.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l (neg.f64 l))) Om) (neg.f64 Om))
(/.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l (neg.f64 l))) #s(literal -1 binary64)) (*.f64 Om Om))
(pow.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (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 (*.f64 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 l (*.f64 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 l (*.f64 (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(*.f64 (/.f64 l 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))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))))
(*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.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 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l (neg.f64 l))) (/.f64 #s(literal -1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 (*.f64 l l) Om) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) Om))
(*.f64 (/.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 l) Om))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 (*.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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) Om)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.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 l l))
(+.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))))))
(*.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))))
(+.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 l l)) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 l #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 l (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 l l) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 (*.f64 l l) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (*.f64 l l) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) l) l (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) l) l (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(fma.f64 (*.f64 (*.f64 l l) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 l l)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (*.f64 l l))) (*.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (*.f64 l l))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (*.f64 l l)))) (-.f64 (*.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 l l) (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 (*.f64 (*.f64 l l) (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 (*.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 l l)) (-.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 (*.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 l l)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(*.f64 l (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 l l))
(*.f64 (*.f64 l (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) 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) (/.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))
(*.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 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 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (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))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #s(literal -2 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)))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 kx #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 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 #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 ky kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))
(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 ky kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (neg.f64 (*.f64 Om Om)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 Om Om))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 Om Om)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (neg.f64 (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (neg.f64 (*.f64 Om Om))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)) (neg.f64 (*.f64 Om Om))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) (neg.f64 (*.f64 Om Om)))
(/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (neg.f64 Om)) Om)
(/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) Om) (neg.f64 Om))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (*.f64 Om Om)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 Om Om))) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal -1 binary64)))
(/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 Om Om))
(pow.f64 (neg.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 Om Om)))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))
(*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.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 (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 (/.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 kx #s(literal -2 binary64)))))) (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 (fma.f64 (cos.f64 (*.f64 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #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 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 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 (+.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))) (fma.f64 (cos.f64 (*.f64 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.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 (-.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)))))
(/.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 (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 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 ky #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 (neg.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)))))))) (neg.f64 (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -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 #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 #s(literal -2 binary64) (-.f64 ky kx)) #s(literal 1/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 (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 ky kx)) #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 (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 kx #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.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 #s(literal 1 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 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 #s(literal 1 binary64) (-.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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))))
(*.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 ky kx)) #s(literal 1/2 binary64))))

eval409.0ms (3%)

Memory
23.1MiB live, 400.1MiB allocated
Compiler

Compiled 92 374 to 4 541 computations (95.1% saved)

prune418.0ms (3.1%)

Memory
18.4MiB live, 481.3MiB allocated
Pruning

13 alts after pruning (7 fresh and 6 done)

PrunedKeptTotal
New1 78831 791
Fresh246
Picked145
Done022
Total1 791131 804
Accuracy
100.0%
Counts
1 804 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.9%
(*.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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))
76.6%
(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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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)))
92.2%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))))
91.4%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))))
37.6%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))))) #s(literal 1/4 binary64) #s(literal 1/2 binary64))))
47.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
47.8%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
65.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(literal 1 binary64)))
37.3%
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
49.3%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64)))))
33.6%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) #s(literal 1/2 binary64)))))
31.6%
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) #s(approx (+ (* (* l l) (/ (pow (sin kx) 2) (neg (* Om Om)))) 1) (/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))))))
54.2%
(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 1 197 to 447 computations (62.7% saved)

regimes276.0ms (2%)

Memory
-46.2MiB live, 218.4MiB allocated
Counts
34 → 1
Calls
Call 1
Inputs
(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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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))))) (+.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) (fma.f64 #s(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 #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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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)))))))
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) #s(approx (+ (* (* l l) (/ (pow (sin kx) 2) (neg (* Om Om)))) 1) (/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))))))
(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) #s(approx (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1))) (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))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #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 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))))
#s(approx (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)))))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 #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 l Om) #s(literal 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 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)))))))
#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 (+.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.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 #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)))) (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)))))))))
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:

47.0ms
(sin.f64 ky)
26.0ms
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
25.0ms
ky
24.0ms
l
23.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)))))))
Results
AccuracySegmentsBranch
98.8%1l
98.8%1Om
98.8%1kx
98.8%1ky
98.8%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))))))))))
98.8%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)))))))))
98.8%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))))))))
98.8%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)))))))
98.8%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))))))
98.8%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)))))
98.8%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))))
98.8%1(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
98.8%1(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
98.8%1(*.f64 #s(literal 2 binary64) l)
98.8%1(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
98.8%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
98.8%1(sin.f64 kx)
98.8%1(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
98.8%1(sin.f64 ky)
Compiler

Compiled 275 to 198 computations (28% saved)

regimes221.0ms (1.6%)

Memory
13.8MiB live, 209.7MiB allocated
Counts
32 → 2
Calls
Call 1
Inputs
(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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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))))) (+.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) (fma.f64 #s(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 #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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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)))))))
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) #s(approx (+ (* (* l l) (/ (pow (sin kx) 2) (neg (* Om Om)))) 1) (/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))))))
(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) #s(approx (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1))) (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))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #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 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))))))
#s(approx (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)))))) (*.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 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 binary64))) (/.f64 (*.f64 l (*.f64 l #s(literal 4 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))))) (sqrt.f64 #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 l Om) #s(literal 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 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)))))))
#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 (+.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))))))))
Outputs
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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(literal 1/2 binary64)))
Calls

19 calls:

29.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))))))
24.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
23.0ms
(sin.f64 kx)
12.0ms
Om
12.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))))))))))
Results
AccuracySegmentsBranch
95.9%2l
96.4%3Om
92.2%1kx
96.5%2ky
98.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))))))))))
98.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)))))))))
98.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))))))))
98.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)))))))
100.0%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))))))
100.0%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)))))
100.0%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.9%2(*.f64 #s(literal 2 binary64) l)
96.5%2(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
92.2%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
92.2%1(sin.f64 kx)
96.5%2(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
97.7%3(sin.f64 ky)
Compiler

Compiled 275 to 198 computations (28% saved)

regimes45.0ms (0.3%)

Memory
5.8MiB live, 44.6MiB allocated
Counts
26 → 2
Calls
Call 1
Inputs
(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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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))))) (+.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) (fma.f64 #s(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 #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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (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)))))))
(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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (neg.f64 (*.f64 Om Om))) #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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) #s(approx (+ (* (* l l) (/ (pow (sin kx) 2) (neg (* Om Om)))) 1) (/.f64 (fma.f64 Om Om (neg.f64 (*.f64 (*.f64 l l) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 Om Om))))))
(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) #s(approx (sqrt (/ 1 (+ (* 4 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1))) (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))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (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))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.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 #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 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 1 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) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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 #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 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.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) 1) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #s(literal 1 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 #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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/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)))
Calls

5 calls:

17.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))))
7.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
7.0ms
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
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))))))
6.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)))))
Results
AccuracySegmentsBranch
99.2%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.2%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.2%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))))
99.2%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
99.2%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
Compiler

Compiled 88 to 62 computations (29.5% saved)

regimes29.0ms (0.2%)

Memory
-11.6MiB live, 27.3MiB allocated
Counts
10 → 2
Calls
Call 1
Inputs
(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 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #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 (* (pow (sin kx) 2) (/ (* l l) (* 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 (* (pow (sin kx) 2) (/ (* l l) (* Om Om)))) 1)))) 1/2) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (neg.f64 (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (/ (sqrt (- 1 (pow (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)) 2))) (sqrt (- 1 (/ (* (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (* 4 (* l l))) (* Om Om)))))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
(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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l 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 #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))))) #s(approx (+ 1/2 (* 1/2 (sqrt (/ 1 (+ (* 4 (/ (* (* l l) (+ (* -1/2 (cos (* ky -2))) 1/2)) (* Om Om))) 1))))) (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) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (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)) #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))))) (+.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #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 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)))
Calls

5 calls:

15.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
3.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))))
3.0ms
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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)))))
3.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
AccuracySegmentsBranch
97.6%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
97.6%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
99.2%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.2%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.2%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))))
Compiler

Compiled 88 to 62 computations (29.5% saved)

regimes54.0ms (0.4%)

Memory
28.2MiB live, 67.1MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(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)))
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)))
Calls

19 calls:

30.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
1.0ms
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
1.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))))))))))
1.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))))))
1.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)))))))
Results
AccuracySegmentsBranch
54.2%1kx
54.2%1(sin.f64 kx)
54.2%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
54.2%1Om
54.2%1l
54.2%1(*.f64 #s(literal 2 binary64) l)
54.2%1(sin.f64 ky)
54.2%1ky
54.2%1(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
54.2%1(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
54.2%1(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
54.2%1(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
54.2%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))))))))))
54.2%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)))))))))
54.2%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))))))))
54.2%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)))))))
54.2%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))))))
54.2%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)))))
54.2%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))))
Compiler

Compiled 275 to 198 computations (28% saved)

bsearch1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.116457532878817e+65
4.596375396295417e+69
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
161184601767.19928
1.9655696946536217e+33
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
5.9723752424964325e-5
83.06101867545786
Compiler

Compiled 36 to 30 computations (16.7% saved)

simplify35.0ms (0.3%)

Memory
-22.0MiB live, 16.6MiB allocated
Algorithm
egg-herbie
Rules
28×*-commutative_binary64
18×+-commutative_binary64
sub-neg_binary64
neg-sub0_binary64
neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
091324
1115324
2126324
3132324
4136324
5137324
Stop Event
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 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 999999999999999945322333868247445125709646570021247924665841614848 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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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(literal 1/2 binary64))))
(if (<=.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)))) #s(literal 200000000000 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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/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))))
(if (<=.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)))) #s(literal 7378697629483821/73786976294838206464 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 #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/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))))))))))
(if (<=.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 999999999999999945322333868247445125709646570021247924665841614848 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 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (+ (+ 1/2 (* -1/2 (cos (+ kx kx)))) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) (cos.f64 (*.f64 kx #s(literal -2 binary64)))) #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(literal 1/2 binary64))))
(if (<=.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)))) #s(literal 200000000000 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 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l 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/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))))
(if (<=.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)))) #s(literal 7378697629483821/73786976294838206464 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 #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/2 binary64)))

soundness769.0ms (5.6%)

Memory
-10.6MiB live, 797.0MiB allocated
Rules
10 180×lower-fma.f64
10 180×lower-fma.f32
9 134×lower-fma.f64
9 134×lower-fma.f32
8 542×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04747346
115547187
265216855
080346493
0200166576
1676466428
0802062766
02194
03794
112992
292492
0851389
074678
0129643
1510538
24629528
08860498
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 329 to 170 computations (48.3% saved)

preprocess125.0ms (0.9%)

Memory
23.1MiB live, 142.1MiB allocated
Remove

(sort kx ky)

(abs kx)

(abs ky)

Compiler

Compiled 1 692 to 1 038 computations (38.7% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...